Dernière colonne d'une plage nommée

Résolu
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: 

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.
A voir également:

4 réponses

Réponse 1 / 4
ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 
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
0
Réponse 2 / 4
quentiiin68
 
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.
0
quentiiin68
 
Je veux dire par la que la macro précédente récupère la dernière colonne de la plage "AUM", que celle-ci soit vide ou pas.
0
Réponse 3 / 4
ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
  
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
0
Réponse 4 / 4
quentiiin68
 
Super, c'est que je recherchais. Merci de votre aide
0

Discussions similaires

Retrouver l'image originale après avoir fait des modifications ?
Raven -
Asta972155 -

10 réponses
Dechiffrer une image caché
JACQUE -
Otomec -

1 réponse