[VBA-EXCEL] Copier plage de cellules aléatoir
Alecine
-
Polux31 Messages postés 7219 Statut Membre -
Polux31 Messages postés 7219 Statut Membre -
Bonjour,
Voila j'ai de petites compétences en VBA et j'aimerais créer un bouton avec une macro me permettant de copier une plage de valeur non définie (par exemple de A1 à EXX, "XX" étant une valeur inconnue) dans une autre feuille
Donc je pense qu'il faudrait une boucle qui cherche tant qu'une case contient quelque chose et qui s'arrete lorsque c'est vide.
Une fois ceci fait la plage de cellues serait copiée et envoyée vers une nouvelle feuille (ou bien une feuille existante)
Pensez vous que cela est réalisable facilement ?
Je connais les bases mais n'ai pas assez d'experience encore pour faire cela !
Je comprend tout de meme les codes !
Merci d'avance a vous en éspérant avoir une réponse !!
Voila j'ai de petites compétences en VBA et j'aimerais créer un bouton avec une macro me permettant de copier une plage de valeur non définie (par exemple de A1 à EXX, "XX" étant une valeur inconnue) dans une autre feuille
Donc je pense qu'il faudrait une boucle qui cherche tant qu'une case contient quelque chose et qui s'arrete lorsque c'est vide.
Une fois ceci fait la plage de cellues serait copiée et envoyée vers une nouvelle feuille (ou bien une feuille existante)
Pensez vous que cela est réalisable facilement ?
Je connais les bases mais n'ai pas assez d'experience encore pour faire cela !
Je comprend tout de meme les codes !
Merci d'avance a vous en éspérant avoir une réponse !!
A voir également:
- [VBA-EXCEL] Copier plage de cellules aléatoir
- Liste déroulante excel - Guide
- Verrouiller cellules excel - Guide
- Somme de plusieurs cellules excel - Guide
- Word et excel gratuit - Guide
- Excel compter cellule couleur sans vba - Guide
8 réponses
Pour copier ca va j'ai fais avec les moyens du bord voila ce que j'ai :
Je fais une création de feuille suivi d'un copier coller de A65 jusqu'a ma case active (cette derniere case j'aimerais qu'elle soit trouvée tte seule ^^)
Et la plage sélectionnée est copiée dans la feuille crée au préalable
'Création d'une nouvelle feuille
Sheets("Projection").Select
Sheets.Add(after:=Worksheets(Worksheets.Count)).Name = "Nouvelle"
'Copier/Coller des cellules
Sheets("Projection").Select
Range("A65", ActiveCell).Select
Selection.Copy
Sheets("Nouvelle").Select
Range("A1").Select
ActiveSheet.Paste
End Sub
Je fais une création de feuille suivi d'un copier coller de A65 jusqu'a ma case active (cette derniere case j'aimerais qu'elle soit trouvée tte seule ^^)
Et la plage sélectionnée est copiée dans la feuille crée au préalable
'Création d'une nouvelle feuille
Sheets("Projection").Select
Sheets.Add(after:=Worksheets(Worksheets.Count)).Name = "Nouvelle"
'Copier/Coller des cellules
Sheets("Projection").Select
Range("A65", ActiveCell).Select
Selection.Copy
Sheets("Nouvelle").Select
Range("A1").Select
ActiveSheet.Paste
End Sub
bonjour,
Pour trouver la dernière cellule non vide d'une ligne tu peux faire comme ceci :
En espérant que ça puisse t'aider.
;o)
polux
Pour trouver la dernière cellule non vide d'une ligne tu peux faire comme ceci :
Dim i As Long i = 1 While Cells(65,i).value <> "" i = i + 1 Wend MsgBox "La dernière cellule non vide de la ligne 65 est : " & i - 1
En espérant que ça puisse t'aider.
;o)
polux
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Oui en effet ca peut m'aider !
Mais la recherche serait plus pertinente en cherchant dans la colonne, ici ma colonne C
Il ne doit pas y avoir bcp de modifs je pense
Mais la recherche serait plus pertinente en cherchant dans la colonne, ici ma colonne C
Il ne doit pas y avoir bcp de modifs je pense
tu dois faire une boucle
do
loop until <condition>
ou<condition> serait une case vide
pour la fonction qui copie, je sais plus, désolée.
mon aide aura était assez rudimentaire!...