Dernière colonne d'une plage nommée
Résolu
quentiiin68
-
quentiiin68 -
quentiiin68 -
Bonjour,
Je sollicite votre aide car je bloque dans l'écriture de ma macro. Voila mon problème:
J'ai une plage nommée, qui contient plusieurs colonnes:
J'aimerai pouvoir récupérer le numéro de la dernière colonne de ma plage "AUM", sachant que la colonne BQ est également remplie mais ne fait pas partie de la plage.
J'ai besoin de cette manip au cas où des colonnes seraient ajoutées avant la colonne BJ.
Merci d'avance.
Je sollicite votre aide car je bloque dans l'écriture de ma macro. Voila mon problème:
J'ai une plage nommée, qui contient plusieurs colonnes:
Range("BJ1:BP10").Name="AUM"
J'aimerai pouvoir récupérer le numéro de la dernière colonne de ma plage "AUM", sachant que la colonne BQ est également remplie mais ne fait pas partie de la plage.
J'ai besoin de cette manip au cas où des colonnes seraient ajoutées avant la colonne BJ.
Merci d'avance.
4 réponses
-
Bonjour
Public Sub OK()
Dim adr As String, t, derco As String
Range("BJ1:BP10").Name = "AUM"
adr = Range("AUM").Address
t = Split(adr, ":")
derco = Split(t(1), "$")(1)
MsgBox derco
End Sub
Cdlmnt -
Merci, ca solutionne en partie mon problème mais pas totalement. Je m'explique:
J'aimerai récupérer le numéro de la dernière colonne non vide de ma plage "AUM". En effet, pour le moment, la colonne "BP" est vide. J'aimerai récupéerer le numéro de la dernière colonne, les colonnes se remplissant les unes après les autres au cours de l'année.
Merci d'avance. -
Public Sub OK()
Dim adr As String, derco As Long
Range("BJ1:BP10").Name = "AUM"
adr = Range("AUM").Address
derco = Range(adr).Find("*", , , , xlByColumns, xlPrevious).Column
MsgBox derco
End Sub
Cdlmnt -
