Pourcourt d'un tableau en vba

Question

Bonjour a tous,


J'ai un petit probl&#232;me, je travaille avec excel et VBA et j'ai un tableau de ce style:
          A          B          C          D
1        ww        xx         yy         zz
2                                  yy         zz
3        aa         bb         cc         dd
4                    bb         cc          dd

(J'espere que ca donnera pas trop mal)

Je voudrai parcourir le tableau cellule par cellule et chaque fois qu'une cellule est vide, je voudrai la remplir avec la valeur de la cellule du dessus. (ex en A2 --> ww et en A4 --> aa)
Je ne sais pas trop comment faire...
Deux boucles for p-etre??
Merci d'avance pour votre aide...

A bientot

mkt2001

ramontac · Answer

Salut, 

Bon pour l'algorithme c'est pas trop compliqu&#233;

Comme tu l'as devin&#233; il te faut deux boucles imbriqu&#233;es puisque c'est un tableau &#224; deux dimensions

Moi je te conseil de de parcourir colonne par colonne et sauvegarder la valeur pr&#233;cedemment analys&#233;

Donc ca donne un truc de ce style tu verifiera la syntaxe
Dim ijprec

For i = A To B 'Deroule les colonnes
   valprec = ""    'La variable doit a chaque fois etre initialis&#233;e
   For j = 1 To 4 'Deroule les lignes
      If ij =  "" then
         ij = valprec 'Si la case est libre on lui affecte la valeur pr&#233;cedente
      End if
      valprec = ij 'Sauvegarde de la valeur de la case
   Next j
Next i

Voila reste a refaire la syntaxe pour ton appli et ca marche

BOn courage

mkt2001 · Answer

Merci Ramontac, il ne me reste plus que un probl&#232;me &#224; r&#233;soudre:
Pour l'exemple j'ai mis 4 lignes et 4 colonnes mais cette zonne de travail peux varier &#224; chaque &#233;x&#233;cution. Comment pourait-ont faire pour que les deux boucles 'for' en tiennent compte. J4ai &#233;ssayer un truc du genre :

For i = 0 To Columns.Count
        For j = 112 To Rows.Count
...

Mais ce systeme passe en revue les 65535 lignes et toutes les colonnes de la feuille! 

mkt2001

mkt2001 · Answer

Probl&#232;me r&#233;solu

ramontac · Answer

Salut mkt2001,

J'etais pr&#232;s &#224; te repondre mais puisque tu as trouv&#233; alors tant mieux
Bon courage et si tu as besoin ...
a bientot

Pourcourt d'un tableau en vba

4 réponses

Discussions similaires