Explication code VBA

  • Initiateur de la discussion Initiateur de la discussion Jacques
  • 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 !

J

Jacques

Guest
Bonsoir à tous,

Quelqu'un peut il éclairer mes lanternes au niveau du code suivant :

Private Sub ToggleButton1_Change()
If Me.ToggleButton1 = True Then
Starting
Running = True
Me.ToggleButton1.Caption = 'Stop Auto_Import TXT'
Import.Activate
Else
StopUpdateTXT
Running = False
Me.ToggleButton1.Caption = 'Run Auto_Import TXT'
Interface.Activate
End If

End Sub

A quoi correspond le Me sur la ligne 2?
Est il possible dans ce même code de modifier l'apparence du userform où se trouve le togglebutton (agir sur les propriétés de position ==> height, left, top et width)?
Je viens de passer la journée à chercher et là je capitule...

Merci de votre aide à tous.

Jacques
 
Bonsoir Jacques

Le Me correspond à l'ueserform en cours.

Maintenant en vba tu peux modifier ton userfrom

exemple:

With userform1
.height= ta valeur
.left=....
.top=...
.width=...
end with

voila en espérant t'avoir répondu

Cordialement

Denis
 
Salut DDalmont, le forum

Merci de tes explications, pour l'apparence de l'userform, c'est ce que j'ai fait et refait plusieurs fois hier et ça ne marchait pas, j'ai seulement changé la place dans le code et ça marche.
Merci encore de ton aide.

@ plus

Jacques
 
Salut DDalmont, le forum

Merci de tes explications, pour l'apparence de l'userform, c'est ce que j'ai fait et refait plusieurs fois hier et ça ne marchait pas, j'ai seulement changé la place dans le code et ça marche.
Merci encore de ton aide.

@ plus

Jacques
 
- 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
21
Affichages
2 K
  • Question Question
Microsoft 365 îPb code VBA
Réponses
1
Affichages
669
Retour