Récupérer des valeurs sous excelRésolu

Question

Bonjour a tous

Je suis novice en VB,
Je souhaite copier un cellule excel "exemple H14 = TOTO" si  cette cellule n' a pas de valeur je passe a la cellule I14 etc.... et je copie cette chaine de caractère dans une autre feuille.
Je dois faire cette manip une bonne centaines de fois si qqun avait une petite procédure en VB ou macro excel

Merci d'avance

cs_Jack · Accepted Answer

Salut Pas clair A essayer : Dim maCellule As Object Sheets("Feuil1").Select For Each maCellule In Range("H14:ZZ14") If maCellule.Value <> "" Then Sheets("Feuil2").Select Cells("A1").Value = maCellule.Value Exit For End If Next Vala Jack, MVP VB NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

cs_zergo · Answer

Je te remerci je vais essayer de suite 

bien a toi

bonne journée

Récupérer des valeurs sous excel

2 réponses

Votre réponse