VBA:sélectionner la dernière cellule vide pour copier

Bonjour à tous,

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 Sub

Amicalement

Hello Dan,

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

Bonjour,

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...)

Rechercher des sujets similaires à "vba selectionner derniere vide copier"