Boucle While excel VBA
Résolu/Fermé
A voir également:
- Boucle While excel VBA
- Liste déroulante excel - Guide
- Formule excel - Guide
- Si et excel - Guide
- Aller à la ligne excel - Guide
- Mise en forme conditionnelle excel - Guide
2 réponses
Polux31
Messages postés
6917
Date d'inscription
mardi 25 septembre 2007
Statut
Membre
Dernière intervention
1 novembre 2016
1 204
3 août 2010 à 12:02
3 août 2010 à 12:02
Bonjour,
;o)
Dim derCol As Long
Dim i As Long
derCol = Sheets(1).Range("IV1").End(xlToLeft).Column
For i = 1 To derCol
If Cells(1, i).Value <> "" Then
Cells(2, i).Value = Cells(1, i).Value
End If
Next i
;o)
J'ajoute une suite au problème... parce que j'ai un peu surestimé mes capacités à adapter ce code à ce que je veux faire.
Autre problème donc :
Je veux coupler la fonction recherche et copier coller. Le problème est que les recherches à effectuer varient suivant la feuille où il faut exécuter la macro. Donc :
J'ai un tableau sur feuille1 dont la première ligne IV1 correspond à des libellés (leur nombre n'est pas défini), et sous chaque libellé, une colonnes de chiffres dont la hauteur n'est pas défini.
Sur une autre feuille2, j'ai une ligne IV1 avec différents libellés (leur nombre n'est pas défini non plus). Je veux copier/coller, sous les libellés de la feuille2, la colonne de chiffres correspondant au même libellé de la feuille1.
Exemple :
Feuille1
A1 : Pouet ; B1 : Tût ; C1 : Truc
A2 : 1 ; B2 ; 3 ; C2 : 5
Feuille2
A1 : Tût
Dans ce cas, je veux que ma macro colle en A2 de la feuille2 le chiffre "3".
J'espère que j'ai été clair.
ATTENTION, il faut que toute le code VBA soit relatif, parce qu'il n'y a aucune taille de tableau, colonne, ligne, nombre de libellé et surtout nom des libellés qui sont préalablement connus.
Merci beaucoup, j'espère que vous allez pouvoir me filer encore un coup de main.
Autre problème donc :
Je veux coupler la fonction recherche et copier coller. Le problème est que les recherches à effectuer varient suivant la feuille où il faut exécuter la macro. Donc :
J'ai un tableau sur feuille1 dont la première ligne IV1 correspond à des libellés (leur nombre n'est pas défini), et sous chaque libellé, une colonnes de chiffres dont la hauteur n'est pas défini.
Sur une autre feuille2, j'ai une ligne IV1 avec différents libellés (leur nombre n'est pas défini non plus). Je veux copier/coller, sous les libellés de la feuille2, la colonne de chiffres correspondant au même libellé de la feuille1.
Exemple :
Feuille1
A1 : Pouet ; B1 : Tût ; C1 : Truc
A2 : 1 ; B2 ; 3 ; C2 : 5
Feuille2
A1 : Tût
Dans ce cas, je veux que ma macro colle en A2 de la feuille2 le chiffre "3".
J'espère que j'ai été clair.
ATTENTION, il faut que toute le code VBA soit relatif, parce qu'il n'y a aucune taille de tableau, colonne, ligne, nombre de libellé et surtout nom des libellés qui sont préalablement connus.
Merci beaucoup, j'espère que vous allez pouvoir me filer encore un coup de main.
3 août 2010 à 13:49
A plus tard !