Insertion lignes, problème de code
Résolu
Akalia
Messages postés
34
Date d'inscription
Statut
Membre
Dernière intervention
-
Akalia Messages postés 34 Date d'inscription Statut Membre Dernière intervention -
Akalia Messages postés 34 Date d'inscription Statut Membre Dernière intervention -
A voir également:
- Insertion lignes, problème de code
- Code ascii - Guide
- Code de déverrouillage oublié - Guide
- Code puk bloqué - Guide
- Code activation windows 10 - Guide
- Code blocks - Télécharger - Langages
2 réponses
Bonjour,
Voilà une façon de faire
Attention de bien effacer toutes les lignes de la colonne G ... j'ai trouvé des données en ligne 100 et +.
Voilà une façon de faire
Sub CommandButton1() Dim ws As Worksheet Set ws = ThisWorkbook.Worksheets("Feuil1") ws.Range("G" & ws.Range("G" & Rows.Count).End(xlUp).Row + 1).Value = ws.Range("C3").Value End Sub
Attention de bien effacer toutes les lignes de la colonne G ... j'ai trouvé des données en ligne 100 et +.