VBA:sélectionner la dernière cellule vide pour copier
afin de terminer un fichier pour une question de "débutant" (post du 31 août) concernant des horaires je cale sur une ligne de VBA. Je pensais trouver la réponse avec une fois de plus end(x1up)...mais j'ai du mal à formaliser mon besoin.
Je vous mets le code expliqué où j'ai souligné et mis en rouge ce dont j'ai besoin.
'Sub valider()
'
' valider Macro
' Macro enregistrée le 02/09/2010 par PLabrousse
'
Range("A100:D114").Select
Selection.Copy
'Copier le tableau de saisie
Sheets("Feuil1").Select 'aller sur la base globale
'aller sur la dernière cellule vide de la colonne E et coller le tableau
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
'options de collage
Sheets("Saisie").Select
Range("C14:D28").Select
Application.CutCopyMode = False 'vider la grille de saisie
Selection.ClearContents
End Sub
D'avance merci pour lui et aussi pour moi car ça me forme encore et toujours.
Amicalement,
Elfi
Bonjour,
Essaie comem ceci :
Sub valider()
' valider Macro
' Macro enregistrée le 02/09/2010 par PLabrousse
Dim lg As Long
Range("A100:D114").Copy
With Sheets("Feuil1")
lg = .Range("E65536").End(xlUp).Row
.Select
.Range("E" & lg).PasteSpecial Paste:=xlPasteValues
.Range("E" & lg).PasteSpecial Paste:=xlPasteFormats
With Sheets("Saisie")
.Select
.Range("C14:D28").ClearContents
End SubAmicalement
Nikel, la macro fonctionne. J'ai juste ajouté 'and with'
et j'ai mis '+1' après ceci lg = .Range("E65536").End(xlUp).Row sinon ça me mangeait la dernière ligne.
Peux tu m'expliquer ce que veux dire Dim lg as Long?
Merci beaucoup,
a+,
amicalement,
Elfi
re,
Peux tu m'expliquer ce que veux dire Dim lg as Long?
Il s'agit d'une instruction de déclaration de variable.
La variable est LG
Long est le type de variable pour aller jusque 2 147 483 647 lignes
L'intérêt est qu'Excel demande de la mémoire pour exécuter une macro. DIM permet de définir la quantité de mémoire à utiliser. D'où moins de mémoire tu utilises mieux c'est ...
Si ok n'oublie pas de cloturer le fil en cliquant sur le V vert.
Bon je file car occupé ce soir.
A bientôt
Amicalement
merci pour les tuyaux.
A bientôt ,
Amicalement,
Elfi
Salut à tous,
Le code marche niquel, mais auriez vous une idée pour faire en sorte que l'action se repète à chaque exécution?
J'ai appliqué ce code à un command button et j'aurais besoin qu'à chaque pression du bouton, il copie la valeur de la cellule en question sur la ligne en dessous.
*edit* l'action se fait d'une feuille vers une autre
Merci d'avance pour votre réponse!
Gabriel
Pardon pour le dérangement, trouvé comme un grand! (vu la difficulté du truc j'ai un peu honte mais bon...)