D
daniel
Guest
Bonsoir le forum !
Voilà mon problème. J'ai une feuille active et un USF avec un contrôle spreadsheet. J'arrive à récupérer les données de ma feuille dans mon contrôle spreadsheet (en cliquant sur un bouton) de la manière suivante :
Private Sub CommandButton1_Click()
Dim lig, I, J As Integer
lig = Sheets('Feuil1').Range('A1:A65536').End(xlDown).Row
For I = 1 To lig
For J = 1 To 5
Spreadsheet1.Cells(I, J).Value = Sheets('Feuil1').Cells(I, J).Value
Next J
Next I
Spreadsheet1.Columns.AutoFitColumns
end sub
Mais lorsque je filtre ma feuille active, je voudrais ne récupérer dans ma spreadshheet que les cellules visibles. Comment puis-je faire ?
Merci de votre aide et bonne soirée
Daniel
Voilà mon problème. J'ai une feuille active et un USF avec un contrôle spreadsheet. J'arrive à récupérer les données de ma feuille dans mon contrôle spreadsheet (en cliquant sur un bouton) de la manière suivante :
Private Sub CommandButton1_Click()
Dim lig, I, J As Integer
lig = Sheets('Feuil1').Range('A1:A65536').End(xlDown).Row
For I = 1 To lig
For J = 1 To 5
Spreadsheet1.Cells(I, J).Value = Sheets('Feuil1').Cells(I, J).Value
Next J
Next I
Spreadsheet1.Columns.AutoFitColumns
end sub
Mais lorsque je filtre ma feuille active, je voudrais ne récupérer dans ma spreadshheet que les cellules visibles. Comment puis-je faire ?
Merci de votre aide et bonne soirée
Daniel