re

[jeanphi]

bonjour

le résultat de la macro ci dessous me permet de récupérer certaines infos d une feuille pour les copier dans une autre à partir de la cellule A4
par contre meme si je change A4 par une autre adresse de cellule, la ligne s incremente toujours au meme droit
quelqu un sait t il pkoi?
si oui quelle modif dois je apporter?
merci
cdlt


Private Sub CommandButton4_Click()
Dim cell As Range
Application.ScreenUpdating = False
With Sheets("Livraison")
.Range("A4" & ":" & "I" & .Range("G65536").End(xlUp).Row + 1).Clear
End With

For Each cell In Sheets("FEB").Range("E7:E" & Sheets("FEB").Range("E65536").End(xlUp).Row)

If cell.Value = "Validation ACHATS" Or cell.Value = "Traitement ACHATS" Then
If cell.Offset(0, 12) <> "" And cell.Offset(0, 15) = "" Then
cell.Offset(0, -3).Copy Sheets("Livraison").Range("A" & Sheets("Livraison").Range("A65536").End(xlUp).Row + 1)
cell.Offset(0, -1).Copy Sheets("Livraison").Range("B" & Sheets("Livraison").Range("B65536").End(xlUp).Row + 1)

 

[Pierrot93]

Re : re

Bonjour

a quoi bon, te répondre puisque tu ne nous dit même pas si les réponses fournies conviennent ou pas...

D'autre par ton titre "re" pas très explicite, comme la dernière fois, et ne permet aucune recherche pour les futures questionneurs...

https://www.excel-downloads.com/threads/re.79631/

tu devrais peut être lire la chartre de ce forum...

@+

 

[Robert]

Re : re

Bonjour Jeanphi, Pierrot, bonjour le forum,

Pas du tout d'accord avec toi Pierrot... Jeanphi ne devrait pas peut-être lire la Lien supprimé du forum ! il devrait surtout lire la Lien supprimé du forum.

 

[jeanphi]

recuperer des valeurs en fonction de variables

bonjour


si je n'ai pas répondu, je suis désolé c est un oubli 😱 car si tu regardes bien dans le forum, j'ai répondu gloabalement a toutes les reponses qui m ont été adressés
cdlt