A voir également:
- Sortir données d'un tableau excel avec vba
- Tableau croisé dynamique - Guide
- Liste déroulante excel - Guide
- Tableau ascii - Guide
- Comment imprimer un tableau excel sur une seule page - Guide
- Formule excel - Guide
1 réponse
melanie1324
Messages postés
1505
Date d'inscription
vendredi 25 mai 2007
Statut
Membre
Dernière intervention
31 janvier 2018
154
7 août 2009 à 21:17
7 août 2009 à 21:17
Bonjour,
Pourquoi ne pas faire un tableau croisé dynamique?
Ca te synthétisera ton tableau avec les output voulus.
Mais si tu veux vraiment du vba :
sub marco ()
dim i,j, a,b, reference, c as string
cells(i,j).select 'i et j sont la ligne et la colonne de la premiière ligne
do while selection <> "" then
selection = reference
a= 2
c=0
cells(a,b).select ' a est la première ligne de ton nouveau tableau et b la colonne de ton tableau
do while selection <>""
if selection = reference then
c=1
end if
a=a+1
loop
if c=0 then
cells(a,b).select
selection = reference
i=i+1
cells(i,j).select
loop
end sub
si c'est sur des feuilles différentes : sheets("nomfeuille").select
un conseil ait la fenetre vba et excel en visu et appuie sur f8, tu veras ce que fait lea macro en détail
Pourquoi ne pas faire un tableau croisé dynamique?
Ca te synthétisera ton tableau avec les output voulus.
Mais si tu veux vraiment du vba :
sub marco ()
dim i,j, a,b, reference, c as string
cells(i,j).select 'i et j sont la ligne et la colonne de la premiière ligne
do while selection <> "" then
selection = reference
a= 2
c=0
cells(a,b).select ' a est la première ligne de ton nouveau tableau et b la colonne de ton tableau
do while selection <>""
if selection = reference then
c=1
end if
a=a+1
loop
if c=0 then
cells(a,b).select
selection = reference
i=i+1
cells(i,j).select
loop
end sub
si c'est sur des feuilles différentes : sheets("nomfeuille").select
un conseil ait la fenetre vba et excel en visu et appuie sur f8, tu veras ce que fait lea macro en détail
10 août 2009 à 16:22