Macro exel

C

Compte Supprimé 979

Guest

• 3 Mai 2012

• #2

Re : Macro exel

Bonjour Piyou23 et bienvenue sur ce forum

Si tu souhaites créer des colonnes une seule fois, il suffit de tester si ces colonnes existent 😕

A+

 

Vote positif 0 Vote négatif

P

piyou23

Guest

• 3 Mai 2012

• #3

Re : Macro exel

Merci BrunoM45 !

J'ai pensé faire une boucle pour regarder si elles sont présentent en effet.
If elles sont pas présentent
alors créer collone
If elle sont présentent
recopier les anciens éléments a l'intérieur.
END

Qu'en pensez vous ?

Merci !

 

Vote positif 0 Vote négatif

C

Compte Supprimé 979

Guest

• 3 Mai 2012

• #4

Re : Macro exel

Re,

Oui c'est à peu près ça, il faut tester si le texte d'entête de colonne existe à l'endroit ou il devrait être
Sans faire 2 tests puisque si ce n'est pas un cas, c'est forcément l'autre 😉

Code:

If Range(A1) <> "TexteEntêteColonne1" Then
' Pas présente alors je copie et insère la colonne
Else
' Présente, alors je copie/colle les valeurs
End IF

A+

 

Vote positif 0 Vote négatif

P

piyou23

Guest

• 3 Mai 2012

• #5

Re : Macro exel

Merci BrunoM45 !

J'essaye cette solution tout de suite.
Si je ne parviens pas à m'écrire je reviens vous demandez un peux d'aide 😉

Merci !

 

Vote positif 0 Vote négatif

P

piyou23

Guest

• 3 Mai 2012

• #6

Re : Macro exel

Une petite question :

Dans mon code, qu'elle est la manière de spécifié les colonnes recherchés ?
Car elles ne se trouveront peut être pas tout le temps au même endroit.

Merci de vos réponses


If Range(A1) <> "TexteEntêteColonne1" Then
Columns("BE:BI").Select
Selection.Copy
Columns("BE:BI").Select
Selection.Copy
Else
Cells.Select
Selection.Delete Shift:=xlUp
End If

End Sub

 

Vote positif 0 Vote négatif