Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Comment dire la valeur d'une cellule de la feuille précédente

CVL

XLDnaute Nouveau
Bonjour,
Je voudrais savoir comment dire dans une macro : la valeur d'une cellule de la feuille précédente.

Je voudrais nommer une nouvelle feuille créée et située à la fin des feuilles comme la valeur d'une cellule "L1" qui se trouve dans la feuille précédente.
Merci ...

Cordialement,
CVL
 

Paf

XLDnaute Barbatruc
Re : Comment dire la valeur d'une cellule de la feuille précédente

Bonjour,

si la feuille vient d'être créée en dernière position, à tester:

ActiveSheet.Name = Worksheets(Worksheets.Count - 1).Range("L1")


sinon pour trouver dans la feuille précédente:

MaVariable=Worksheets(ActiveSheet.Index - 1).Range("L1")

à noter que ça fonctionne moins bien si on est déjà positionné sur la première feuille

A+
 

mapomme

XLDnaute Barbatruc
Supporter XLD
Re : Comment dire la valeur d'une cellule de la feuille précédente

Bonjour CVL, Paf ,

Un exemple de macro:
VB:
Sub AjouterFeuilAlafinNommer()
With ThisWorkbook.Worksheets
    .Add after:=.Item(.Count)
    .Item(.Count).Name = .Item(.Count - 1).Range("L1")
  End With
End Sub
 

Pièces jointes

  • CVL-Créer Feuille et nommer-v1.xlsm
    17 KB · Affichages: 31
Dernière édition:

CVL

XLDnaute Nouveau
Re : Comment dire la valeur d'une cellule de la feuille précédente

Re, une petite info ..
La fonction a bien fonctionné jusqu'à ce que je supprime certaines feuilles..
On dirait que la fonction ne fonctionne plus lorsque des feuilles ont été supprimées.
En passant dans la macro sur la ligne sur Worksheets.Count, je vois que le numéro indiqué n'est pas le dernier (indique 14 au lieu de 9).
Y aurait-t-il une fonction qui reprenne le compte exact sans tenir compte des feuilles supprimées ?

Cordialement,
CVL
 

CVL

XLDnaute Nouveau
Re : Comment dire la valeur d'une cellule de la feuille précédente

Re,
J'ai mis ci-dessous le lien url du fichier.
L'idée était de copier le fichier modèle à la fin du fichier et lui donner le nom suivant de la dernière feuille ...

Merci ...
CVL
Document Cjoint
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…