[VBA] Cellule sous graphique et colonne active

[Allergique]

Bonjour,

Dans une macro j'ai 2 problèmes que je n'arrive pas à résoudre, et après une recherche sans résultat sur le forum je poste ce message.

1er problème:

j'ai un graphique de positionné sur une page. Je souhaiterai trouver la première cellule située en dessous du graphique.

Si j'utilise la fonction ActiveSheet.Shapes("xxxx").Top, il me renvoie une position de type "520" par exemple, mais pas un nom de cellule
Comment est-ce possible de trouver que c'est la cellule "range("C30") par exemple qui est la première cellule sous le graphique?


2ème problème:

pour définir la mise en page je souhaite trouver le nom de la dernière colonne du tableau.

En utilisant le code ci-dessous, il me renvoie une colonne "11" au lieu de "K".

Range("IV" & ligne).Select
Selection.End(xlToLeft).Select
colonne = ActiveCell.Column

Comment obtenir le nom de la colonne de en lettre au lieu de chiffre?

Merci par avance pour votre aide

 

[Pierrot93]

Re : [VBA] Cellule sous graphique et colonne active

Bonsoir Allergique,

pour ton 1er problème regarde peut être le code ci dessous :

MsgBox Sheets("Feuil1").ChartObjects(1).BottomRightCell.Offset(1, 0).Address

bonne soirée
@+

 

[Pierrot93]

Re : [VBA] Cellule sous graphique et colonne active

Re

ta 2ème question :

Dim x As String
x = Split(ActiveCell.Address, "$")(1)

@+

 

[Allergique]

Re : [VBA] Cellule sous graphique et colonne active

Re,

Super, ça marche nickel

Merci pour ton aide

Bonne soirée