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

Retour vers onglet initial

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion Mers
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
M

Mers

XLDnaute Junior
Bonsoir.

J'ai une macro avec laquelle je copie des données que je colle dans un autre onglet. Cette macro peut être exécuté par exemple à partir de l'onglet A, B ou C.

Ce que je veux, c'est qu'au moment où j'exécute la maro, j'enregistre à partir de quels onglets je l'ai exécuté afin de pouvoir y revenir à la fin de la macro.

Ça se fait?

Merci d'avance,

M.
 
Trier par date Trier par votes
Re : Retour vers onglet initial

Bonjour Mers
Essayez
Code: 
[COLOR="DarkSlateGray"][B]Dim maFeuille As String
   maFeuille = ActiveSheet.Name[/B][/COLOR]
au début de la procédure et
Code: 
[COLOR="DarkSlateGray"][B]   Sheets(maFeuille).Activate[/B][/COLOR]
à la fin.​
ROGER2327
#2749
 
Vote positif 0 Vote négatif
Re : Retour vers onglet initial

Salut Mers et le forum
Ce que je veux, c'est qu'au moment où j'exécute la maro, j'enregistre à partir de quel onglet je l'ai exécuté afin de pouvoir y revenir à la fin de la macro.
Cliquez pour agrandir...
Ouais, ça se fait, mais pourquoi changer d'onglet ?
Sheets("A").select
Range("A1:A10").copy
Sheets("X").select
Range("A65536").end(xlup)(2).select
ActivesheetPaste

peut être remplacé par
Sheets("A").Range("A1:A10").copy Sheets("X").Range("A65536").end(xlup)(2)

C'est vrai que tu peux avoir besoin de sélectionner la feuille (pour spécialpaste... xlvalue, par exemple)
Tu peux utiliser la formulation de ROGER2327, ou
Code: 
Dim F as Worksheet
....
set F = activesheet
 
Sheets("A3).select
.....
F.select
Perso, dans ce cas, à la place des select, jefais comme ROGER2327, je mets .Activate, mais la finalité est la même.
A+
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

  • Résolu(e)
XL 2019 un onglet masqué peut-il servir/être actif même s'il n'apparaît pas dans le classeur ? comment améliorer ce classeur (automatiser) ?
Réponses
14
Affichages
334
sylvanu
N
  • Question Question
XL 2021 Affecter automatiquement une valeur dans une cellule en fonction d'une saisie dans une autre cellule
Réponses
9
Affichages
319
Nico Gre
N
  • Résolu(e)
Microsoft 365 Récupération d'une valeur particulière dans un tableau...
Réponses
13
Affichages
414
nightswan
  • Question Question
Microsoft 365 faire une copie d'un fichier stocké dans un sous sous... sous répertoire
2
Réponses
20
Affichages
1 K
TooFatBoy
A
  • Question Question
Microsoft 365 INDEX+EQUIV dont le resultat duplique les lignes par erreur
Réponses
5
Affichages
480
aeca
A
J
  • Question Question
XL 2013 Boucle : copie valeur d'une table dans un autre onglet jusqu'à cellule non vide
Réponses
4
Affichages
570
jerome91
J
E
  • Résolu(e)
XL 2016 Automatiser calculs d'une feuille synthèse
Réponses
4
Affichages
642
ELOTJ
E
  • Résolu(e)
XL 2021 Report de lignes d'un onglet à un autre en conservant format et recopie des commentaires
Réponses
9
Affichages
277
scoobytor
R
  • Résolu(e)
XL 2019 creer une macro pour copier des info d un onglet a un autre dans le meme classeur
Réponses
4
Affichages
803
robpellan52
R
H
  • Résolu(e)
Microsoft 365 Packing list automatisée
Réponses
10
Affichages
1 K
HugoLaChips
H
F
  • Question Question
XL 2016 copie de doublons sur nouvel onglet
2
Réponses
22
Affichages
2 K
finarobert
F
  • Question Question
Microsoft 365 MACRO VBA - Extraire des listes à partir d'une boucle
Réponses
5
Affichages
693
chris6999
Z
  • Question Question
XL 2016 Macro pour copier plusieurs cellules vers un fichier :(
Réponses
3
Affichages
534
zendb
Z
P
  • Résolu(e)
XL 2021 Besoin d'aide pour copier/coller données de plusieurs classeurs
2
Réponses
20
Affichages
2 K
Pac41240
P
C
  • Résolu(e)
Microsoft 365 Duplication à partir d'une base de données du contenu d'un onglet dans d'autres onglets
Réponses
2
Affichages
784
Céline49
C
A
  • Résolu(e)
Microsoft 365 Copier la même cellule de plusieurs onglets dans différentes colonnes
2
Réponses
23
Affichages
2 K
AlexiaC
A
R
  • Résolu(e)
Autres Masquer des lignes et colonnes en fonction d'une valeur d'un menu déroulant
Réponses
1
Affichages
663
Romain77144
R
T
  • Résolu(e)
Microsoft 365 macro sur cellule nom onglet (formule) pour ouvrir l'onglet correspondant
Réponses
8
Affichages
845
Tartineaunut
T
D
  • Résolu(e)
XL 2021 VBA - Copies de données entre deux tableaux structurés avec plusieurs conditions
Réponses
5
Affichages
851
Drapela
D
C
  • Question Question
XL 2016 rapatrier des informations en "scannant" les onglets d'un fichier excel vers les cellules d'un autre onglet
Réponses
6
Affichages
882
job75
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…