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

Nom de feuille qui ne passe pas ????

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion Macpoy
  • 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

Macpoy

XLDnaute Impliqué
bonsoir le forum,
dans une macro je fais intervenir le nom d'une feuille.
la ou excel a du mal (surtout moi d'ailleur !!!) c'est que dès que ce nom de feuille comporte une apostrophe ou un accent la macro se bloque.

je vous remercie d'avance pour toutes vos éventuelles suggestions.
 
Trier par date Trier par votes
Re : Nom de feuille qui ne passe pas ????

Re,

Le problème des versions, je ne vais, sauf miracle, pas pouvoir t'aider d'avantage, je n'ai plus vraiment souvenir des différences entre 2000 et 2003....

Demain, il fera jour, enfin , j'espère
 
Vote positif 0 Vote négatif
Re : Nom de feuille qui ne passe pas ????

Bonsoir Macpoy et le forum,

Voici une solution :
Corrections apportées dans la procédure "cmdOK_Click" de la USF "AdClient".

Code: 
'NomFeuille = CStr(TxtNom)
Lig = Recet.Columns(1).Find("*", , , , , xlPrevious).Row
LigSuiv = 3
  For Col = 2 To 25 Step 2
        
      Recet.Cells(Lig, Col).Value = "='" & Replace(TxtNom, "'", "''") & "'!" & ("L" & LigSuiv)
      LigSuiv = LigSuiv + 1
   
  Next Col
LigSuiv = 3
  For Col = 3 To 25 Step 2
    
      Recet.Cells(Lig, Col).Value = "='" & Replace(TxtNom, "'", "''") & "'!" & ("M" & LigSuiv)
      LigSuiv = LigSuiv + 1

         
  Next Col

En fait, il faut doubler l'apostrophe se trouvant dans le nom pour éviter qu'il y ait une erreur.
ex : ='L''éssais'!L3

Il y a peut-être d'autres endroits où cela doit être fait. A toi de voir.
 
Dernière édition:
Vote positif 0 Vote négatif
Re : Nom de feuille qui ne passe pas ????

Re,

Cela coïnce aussi avec ma version.
Mais remplaçe

 1) TxtNom.Text par TxtNom.Value partout

2) Recet.Cells(Lig, Col).Value = "=" & TxtNom.Value & "!" & ("L" & LigSuiv)
par
Recet.Cells(Lig, Col).Value = "=" & ActiveSheet.Name & "!" & ("L" & LigSuiv)

dans les 2lignes correspondantes et dis m'en des nouvelles.
Remarque : il faut bien sûr être dans la nouvelle feuille !
 
Dernière édition:
Vote positif 0 Vote négatif
Re : Nom de feuille qui ne passe pas ????

Bonjour le forum, bonjour à tous les excelliens de ce fil,
Merci mathieu33, ta solution fonctionne très bien même si je ne comprend pas comment ces changements obligent notre logiciel préféré à effectuer l'opération dont j'avais besoin.
merci encore à tous les contributeurs.
à très bientôt peut être.
 
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

D
  • Question Question
XL 2021 Problème de macro
Réponses
5
Affichages
248
Didierpasdoué
D
  • Résolu(e)
XL 2021 Code vba pour filtres automatiques sans le nom de l'onglet
Réponses
4
Affichages
193
sylvanu
N
  • Question Question
Microsoft 365 Vérifier si une référence existe dans un tableau Excel avant de la créer
2
Réponses
19
Affichages
1 K
nikeu01
N
  • Question Question
Microsoft 365 problème de modification de code VBA sur image
Réponses
6
Affichages
291
Yann71
  • Question Question
Microsoft 365 Macro qui enchaine deshoraires Aller-Retour en fonction de critères
Réponses
10
Affichages
277
bsalv
B
  • Question Question
Microsoft 365 Création automatique de feuille et le remplissage correspondant
Réponses
8
Affichages
433
gbinforme
G
C
  • Résolu(e)
XL 2016 humains VS chatGPT
Réponses
9
Affichages
895
AtTheOne
  • Résolu(e)
Microsoft 365 rendre visible automatiquement l'onglet de la feuille active sur la barre de navigation inférieure
Réponses
11
Affichages
1 K
Eric 888
  • Question Question
XL 2019 Macro bloque en court de travail
Réponses
4
Affichages
338
fanch55
K
  • Résolu(e)
XL 2013 Problème de tri alphabétique avec scripting dictionary
2
Réponses
16
Affichages
600
ChTi160
  • Résolu(e)
Microsoft 365 référence feuille en fonction du nom d'une cellule
Réponses
4
Affichages
429
tristan05
K
  • Question Question
Problème de tri alphabétique sur scripting dictionary
Réponses
2
Affichages
209
kiko_23
K
  • Question Question
Microsoft 365 Excel VBA: manipuler des fichiers partagés via Teams / Sharepoint
Réponses
2
Affichages
120
Eric 888
D
  • Résolu(e)
XL 2016 Alimenter une combobox sur une feuille de calcul
Réponses
11
Affichages
382
dgil37
D
D
  • Résolu(e)
Microsoft 365 Bouton supprimer ligne via mon Userfom ne fonctionne pas
Réponses
8
Affichages
782
vgendron
K
  • Question Question
Microsoft 365 Réservation salle de réunion
Réponses
5
Affichages
648
Deleted member 453598
D
J
  • Question Question
XL 2021 Excel CSV vers XSL et ne pas écraser les données
Réponses
9
Affichages
471
sylvanu
T
  • Résolu(e)
Microsoft 365 Evènements de feuille qui s'enchaînent... mais pourquoi ?
Réponses
13
Affichages
414
ThierryP
T
  • Résolu(e)
XL 2021 Problème à l'utilisation calendrier de Patricktoulon.
Réponses
6
Affichages
762
SAMUAL_2023
S
A
  • Question Question
Microsoft 365 Tri sur feuille protégée +Aide protection de données déjà saisies
Réponses
2
Affichages
520
TooFatBoy
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…