Automatisation sous Excel - VB/VBA/VBS - Programmation
Marsh Posté le 25-10-2018 à 19:19:19
Bonjour,
De souvenir, sans tester : https://msdn.microsoft.com/fr-fr/vb [...] erty-excel
Marsh Posté le 27-10-2018 à 16:18:04
Salut, voir ceci : https://www.developpez.net/forums/d [...] d-feuille/
Marsh Posté le 25-10-2018 à 15:37:36
Bonjour,
j'ai automatiser une copie de data d'une page vers une autre
' Copier des DATA
Sheets("Feuil1" ).Select
ActiveWindow.SmallScroll Down:=-42
Range("A4:G40" ).Select
Selection.Copy
mais mon fichier grandit et j'ai la fin de ma sélection qui est passé à G58
comment faire pour que ma sélection grandisse avec l'augmentation de ligne
j'ai essayé de faire ceci....
' Dim Lig As Long
' Lig = 1 'première ligne à vérifier
' Do While Not IsEmpty(Range("C" & Lig))
' Lig = Lig + 1
' Loop
' Range("A4:G" & Lig).Select
mais cela ne fonctionne pas
Auriez vous une solution pour m'aider.
Alex