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

bouton qui ne fonctionne plus sur la bonne feuille

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

fenec

XLDnaute Impliqué
Bonjour le forum

Mettant un peu mon projet en forme je suis confronté à un nouveau problème
Le fait d’avoir déplacé mon bouton pour sauvegarder et incrémenter mon N° de facture celui fonctionne toujours mais plus dans ma feuille facture
Je vous joins mon fichier qui sera plus explicatif
Merci de votre aide
 

Pièces jointes

Trier par date Trier par votes
Re : bouton qui ne fonctionne plus sur la bonne feuille

Bonjour fenec,

Normal, tu as déplacé ton bouton sans modifier l'adressage de ta feuille dans la macro. Essaie en modifiant comme suit :

Code: 
Private Sub CommandButton2_Click() 'Sauvegarder Factures
Application.DisplayAlerts = False
Application.ScreenUpdating = False
        Application.DisplayAlerts = True
        Application.ScreenUpdating = True
        ActiveSheet.Range("E13").Select
        NonClient = Range("E13")
        num = Format(Val(Right(Range("R14"), 3)) + 1, "000")
        ActiveSheet.Unprotect
        Sheets("Facture").Range("R2") = num
        Sheets("Facture").Copy
     Sheets("Facture").Activate
    ActiveWorkbook.SaveAs Filename:="C:\Users\Philippe\Documents\Clients en attente\Factures\" & NonClient & ".xlt"
'ThisWorkbook.Close
    Workbooks("Exemple.xls").Activate
    Workbooks("Exemple.xls").Activate
    Range("Zone_a_remplir") = Empty
    'Range("E13").Select
    ActiveWorkbook.Save
    Application.DisplayAlerts = True
    Application.ScreenUpdating = True
    Workbooks(NonClient).Activate

End Sub

Espérant avoir répondu.

Cordialement.
 
Vote positif 0 Vote négatif
Re : bouton qui ne fonctionne plus sur la bonne feuille

Salut, mieux encore : utiliser le CodeName des feuilles ce qui permet de renommer les onglets,déplacer les feuilles, ajouter des feuilles sans avoir à toucher au code VBA.Pour cela voir VBA Les bases [Résolu] - Forum des professionnels en informatique , sur cette copie d'écran voir nom d'onglet Données et CodeName ShDonnees
 
Dernière édition:
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 Création d'un second bouton qui ne fonctionne pas
Réponses
2
Affichages
217
Titof06
A
  • Question Question
XL pour MAC Problème avec une macro dupliquant une feuille contenant une macro
Réponses
8
Affichages
389
AlineJ
A
  • Résolu(e)
XL 2019 Fonction "Find" qui ne fonctionne pas selon le format de cellule
Réponses
12
Affichages
450
Titof06
P
  • Résolu(e)
XL 2021 Comment détecter la modification MANUELLE d'une cellule dans une feuille ?
Réponses
3
Affichages
337
PRy
P
D
  • Résolu(e)
Microsoft 365 Bouton supprimer ligne via mon Userfom ne fonctionne pas
Réponses
8
Affichages
784
vgendron
  • Question Question
XL 2019 Copier et coller automatiquement une nouvelle donnée par un bouton, ListView décallée à la sur la page (Multipage) et vibration du Userform
2
Réponses
16
Affichages
977
TooFatBoy
D
  • Résolu(e)
XL 2019 Nouveau Numéro
2 3 4
Réponses
57
Affichages
3 K
patricktoulon
N
  • Résolu(e)
XL 2010 Mémoriser l'action sur un bouton
2
Réponses
16
Affichages
812
sylvanu
S
  • Résolu(e)
Microsoft 365 Formule TRIER
Réponses
3
Affichages
256
sayesaye22
S
A
  • Question Question
VBA qui fonctionnait avant, mais ne fonctionne plus avec le 64 bits
Réponses
2
Affichages
747
patricktoulon
M
  • Question Question
XL 2013 Bouton commande ne fonctionne pas
Réponses
7
Affichages
659
midovic
M
A
  • Question Question
XL 2021 Module d’envoi à la Corbeille qui ne fonctionne pas en 64 Bits
2
Réponses
20
Affichages
989
patricktoulon
C
  • Question Question
Microsoft 365 macro copie de feuilles (avec formules à adapter)
Réponses
9
Affichages
507
caseras
C
S
  • Question Question
XL 2013 enregistrer une feuille excel converti en pdf dans un répertoire selon la valeur d'une cellule
Réponses
5
Affichages
686
Phil69970
N
  • Question Question
Microsoft 365 afficher/masquer des lignes en fonction de la valeur d'une cellule qui aura été renseignée par une autre feuille (via un copier/collé automatique)
Réponses
5
Affichages
1 K
Nel'
N
  • Résolu(e)
XL 2010 Historique factures et incrémentation numéro croissant
2
Réponses
21
Affichages
2 K
Orson83
P
  • Question Question
Microsoft 365 garder en mémoire plusieurs listview d'un userform
Réponses
4
Affichages
724
patricktoulon
  • Résolu(e)
XL 2021 Revenir à la dernière feuille "Créée"
2 3
Réponses
38
Affichages
3 K
TooFatBoy
O
  • Résolu(e)
XL 2010 Macro qui ne fonctionne plus
Réponses
3
Affichages
732
Ommagawi
O
F
  • Question Question
XL 2016 Texte du bouton qui disparait après avoir cliqué dessus
Réponses
2
Affichages
565
youky(BJ)
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…