Macro pour copier données dans BDD après lignes déjà remplies
Résolu/Fermé
GregBabar
Messages postés
8
Date d'inscription
vendredi 22 janvier 2016
Statut
Membre
Dernière intervention
7 mars 2016
-
Modifié par GregBabar le 7/03/2016 à 17:40
Theo.R Messages postés 575 Date d'inscription vendredi 11 juillet 2014 Statut Membre Dernière intervention 30 mars 2016 - 8 mars 2016 à 09:57
Theo.R Messages postés 575 Date d'inscription vendredi 11 juillet 2014 Statut Membre Dernière intervention 30 mars 2016 - 8 mars 2016 à 09:57
A voir également:
- Macro pour copier données dans BDD après lignes déjà remplies
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Comment copier une vidéo youtube - Guide
- Macro word - Guide
- Super copier - Télécharger - Gestion de fichiers
- Copier texte pdf - Guide
1 réponse
Theo.R
Messages postés
575
Date d'inscription
vendredi 11 juillet 2014
Statut
Membre
Dernière intervention
30 mars 2016
31
7 mars 2016 à 18:20
7 mars 2016 à 18:20
Bjr,
Essayez :
A adapter si besoin ;)
Cdt,
Essayez :
Sub test()
Dim DernLigne As Long
DernLigne = Sheets("BDD").Range("A" & Rows.Count).End(xlUp).Row
Sheets("BDD").Rows(DernLigne + 1).Value = Sheets("Import").Rows(1).Value
End Sub
A adapter si besoin ;)
Cdt,
7 mars 2016 à 18:33
Oui, j'ai eu besoin de l'adapter un tout petit peu mais ça fonctionne parfaitement !
Merci beaucoup Théo !
Cdt,
8 mars 2016 à 09:57