plus grande valeur d'une colonne

GiBus · 16 Février 2009

[RESOLU]
Bonjour,

comment dans un projet VBA, rajouter un nb de colonne en fonction de la plus grande valeur d'un colonne.

Si la plus grande valeur de la colonne A est 12, rajouter 13 colonne a partir de la colonne C

Merci

jp14 · 16 Février 2009

Re : plus grande valeur d'une colonne

Bonjour

Il faudrait expliciter le terme "rajouter 13 colonne a partir de la colonne C".

Un exemple serait le bienvenu.

JP

Robert · 16 Février 2009

Re : plus grande valeur d'une colonne

Bonjour Gibus, JP14, bonjour le forum,

Je te porpose la macro suivante :

Code:

Sub Macro1()
Dim nm As Integer 'déclare la variable nm (Nombre Maximum)
nm = Application.WorksheetFunction.Max(Range("A1:A" & Range("A65536").End(xlUp).Row))
Columns("D:D").Select 'sélectionne la colonne D
For x = 1 To nm +1 'boucle sur le nombre maximum plus 1
    Selection.Insert Shift:=xlToRight 'insère une colonne après
Next x 'prochaine valeur incrémentée de 1
End Sub

GiBus · 20 Février 2009

Re : plus grande valeur d'une colonne

ça marche nickel
merci

plus grande valeur d'une colonne

GiBus

XLDnaute Nouveau

jp14

XLDnaute Barbatruc

Robert

XLDnaute Barbatruc

GiBus

XLDnaute Nouveau

Discussions similaires

plus grande valeur d'une colonne

GiBus

XLDnaute Nouveau

jp14

XLDnaute Barbatruc

Robert

XLDnaute Barbatruc

GiBus

XLDnaute Nouveau

Discussions similaires

Privacy & Transparency

Privacy & Transparency