convertir =Feuil2!A1 en VBA

N

Naoué

Guest
Salut à tous,

Voila, j'ai des données (environ 150 lignes sur 5 colonnes) sur " feuil2" de mon classeur et je voudrais les envoyer sur "Feuil1" à un endroit bien precis.

en plus clair : j'ai fait un format d'étiquettes à plusieurs cellules sur "Feuil1" et je souhaiterais que toutes mes données de "Feuil2" viennent automatiquement remplir les cellules des étiquettes.

Merci pour votre aide
 
J

juju

Guest
Hello,

Je suis désolé mais je n'ai pas trop compris ta demande... Situ as besoin de copier le bloc de cellule tu peux faire :

Dans la deuxième

Copie la plage de A1 jusqu'à la dernière colonne & dernière ligne
contenant des données de la feuille NomFeuille et la colle dans
le document Word "C:\DocAOuvrir.doc"

Sub CopiePlageDonnees ()
Dim PlageACopier As Range
Dim NbLignes As Long
Dim NbCols As Integer
Sheets("Feuil2").Activate
If WorksheetFunction.CountA(Cells) > 0 Then
NbLignes = Cells.Find("*", [A1], , , xlByRows, xlPrevious).Row
NbCols = Cells.Find("*", [A1], , , xlByColumns, xlPrevious).Column
Else
MsgBox "La feuille ne contient pas de données"
Exit Sub
End If
Set PlageACopier = Range(Cells(1, 1), Cells(NbLignes, NbCols))
PlageACopier.Copy
Sheets("Feuil1").select
Range("A1").Select
ActiveSheet.Paste
End Sub

Mais comme j'imagine que tu souhaites les copier à des endroits particulier peut être pourrais tu mettre ton fichier en ligne.

Bye, @ +

Ju
 

Discussions similaires

Réponses
7
Affichages
430

Membres actuellement en ligne

Statistiques des forums

Discussions
312 321
Messages
2 087 266
Membres
103 502
dernier inscrit
talebafia