transfert des données textbox vers tableau excel
bonjour, le forum
j'ai un nouveau problème avec un code que j'essaie de faire fonctionner, mais erreur "non gérée par cet objet" si quelqu'un peut m'aider SVP! Merci
voici le code qui calle sur la ligne juste apres "for i"
Code:
1
2
3
4
5
6
7
8
9
10
11
|
Private Sub Image2_Click()
Dim pg, i, T
With Sheets("BD_Client")
pg = .Range("A" & Rows.Count).End(xlUp).Row + 1
.Rows(pg).Insert
For i = 1 To 15
.Cells(pg, i + 1).Value = .Controls("T" & i).Value
Next i
End With
End Sub |
