Remplir bdd avec formulaire

Fermé
urbisa - 15 mars 2013 à 18:48
Bonjour,



Je veux moi aussi remplir ma bdd avec le formulaire.
J,ai tenté cette macro, mais je crois que je me suis planté. :-(

Quelqu'un peut m'aider ? C'est peut-être quelque chose de bien simple, mais je n'y connais rien en macro.


Sub remplir_bdd()
Dim ligvide As Long

With Sheets(basededonnées)
ligvide = .Range("A65536").End(3).Row + basededonnées
.Range(.Cells(ligvide, basededonnées), .Cells(ligvide + artiste, basededonnées)) = Sheets(artiste).Range("b1:b25").Value
.Activate
End With

Sheets(artiste).Range("b1:B25").ClearContents

End Sub