OVH Cloud OVH Cloud

Proprietes Textbox ?

4 réponses
Avatar
ya31
Bonjour à tout le monde,

Je débute en Vba Excel....Merci beaucoup pour votre aide,

J'ai créé une textbox dans un Userform, qui s'ouvre à partir d'un bouton
de contrôle, dans un classeur à plusieurs onglets.
Est-il possible une fois la textbox affichée, de naviguer dans les
onglets pour aller prendre des infos et revenir les saisir dans la
textbox. Si oui, quelle est la proc à utiliser ?

La textbox ouverte me bloque l'accès au classeur et aux onglets.

Amicalement.

ya

4 réponses

Avatar
Youky
Salut,
Mets la propriété de l'userform.......ShowModaleúlse
tu pourras naviguer de ton textbox aux cellules Excel
pour cela affiche les propriétés de ton userform
Youky

"ya31" a écrit dans le message de news:
#
Bonjour à tout le monde,

Je débute en Vba Excel....Merci beaucoup pour votre aide,

J'ai créé une textbox dans un Userform, qui s'ouvre à partir d'un bouton
de contrôle, dans un classeur à plusieurs onglets.
Est-il possible une fois la textbox affichée, de naviguer dans les
onglets pour aller prendre des infos et revenir les saisir dans la
textbox. Si oui, quelle est la proc à utiliser ?

La textbox ouverte me bloque l'accès au classeur et aux onglets.

Amicalement.

ya


Avatar
ya31
Bonsoir,

Merci Youky pour ta réponse.

Mais j'ai une erreur: "Impossible d'afficher une feuille non modale
lorsqu'une feuille modale est affichée"....

J'ai oublié de préciser que l'userform concerné est amené par sélection
dans une listbox et validation sur un premier userform.
Voici un bout de ma proc pour le userform 1:

Private Sub CommandButton1_Click()
If IsNull(ListBox1) Then
............
else
UserForm2.Label1.Caption = "OPTION 1" & Chr(10) & _UserForm1.ListBox1.Value

Load UserForm2
UserForm2.Show
.............

End If
End Sub

Amicalement

ya

Salut,
Mets la propriété de l'userform.......ShowModaleúlse
tu pourras naviguer de ton textbox aux cellules Excel
pour cela affiche les propriétés de ton userform
Youky

"ya31" a écrit dans le message de news:
#

Bonjour à tout le monde,

Je débute en Vba Excel....Merci beaucoup pour votre aide,

J'ai créé une textbox dans un Userform, qui s'ouvre à partir d'un bouton
de contrôle, dans un classeur à plusieurs onglets.
Est-il possible une fois la textbox affichée, de naviguer dans les
onglets pour aller prendre des infos et revenir les saisir dans la
textbox. Si oui, quelle est la proc à utiliser ?

La textbox ouverte me bloque l'accès au classeur et aux onglets.

Amicalement.

ya







Avatar
ga51
re-Bonsoir

J'ai trouvé !!
Il suffit de mettre la propriété ShowModal à False pour tous les
userforms liés.

Par contre quelqu'un pourrait-il me dire pourquoi j'ai une erreur:
"erreur de chargement de dll" sur la ligne de ma proc: " Set appword=New
Word.Application" lorsque je crée une instance word à partir d'excel.
(Le texte saisi dans mon userform est envoyé dans un fichier word):
.............
Dim docword As Word.Document
Dim appword As Word.Application
Set appword = New Word.Application
appword.ShowMe
appword.Visible = True
Set docword = appword.Documents.Open("c:documents and settings.......
...........

Merci de votre aide

Amicalement

ya

Bonsoir,

Merci Youky pour ta réponse.

Mais j'ai une erreur: "Impossible d'afficher une feuille non modale
lorsqu'une feuille modale est affichée"....

J'ai oublié de préciser que l'userform concerné est amené par sélection
dans une listbox et validation sur un premier userform.
Voici un bout de ma proc pour le userform 1:

Private Sub CommandButton1_Click()
If IsNull(ListBox1) Then
............
else
UserForm2.Label1.Caption = "OPTION 1" & Chr(10) & _UserForm1.ListBox1.Value

Load UserForm2
UserForm2.Show
.............

End If
End Sub

Amicalement

ya


Salut,
Mets la propriété de l'userform.......ShowModaleúlse
tu pourras naviguer de ton textbox aux cellules Excel
pour cela affiche les propriétés de ton userform
Youky

"ya31" a écrit dans le message de news:
#

Bonjour à tout le monde,

Je débute en Vba Excel....Merci beaucoup pour votre aide,

J'ai créé une textbox dans un Userform, qui s'ouvre à partir d'un bouton
de contrôle, dans un classeur à plusieurs onglets.
Est-il possible une fois la textbox affichée, de naviguer dans les
onglets pour aller prendre des infos et revenir les saisir dans la
textbox. Si oui, quelle est la proc à utiliser ?

La textbox ouverte me bloque l'accès au classeur et aux onglets.

Amicalement.

ya










Avatar
Youky
modifie dans ce code...
App.Path si le répertoire est différent que ton fichier xls
la variable "suivant" est le nom du fichierWord
ce code test si word est ouvert, et test si le fichier word est déja ouvert
justement pour éviter les galères.
Youky

Sub myword()
Dim AppWrd As Object
Dim DocWrd As String
On Error Resume Next
Set AppWrd = GetObject(, "Word.Application")
If Err <> 0 Then _
Set AppWrd = CreateObject("Word.Application")
AppWrd.Visible = True
On Error GoTo 0
DocWrd = App.Path & "" & suivant & ".doc"
On Error Resume Next
AppWrd.Windows(suivant & ".doc").Activate
If Err <> 0 Then AppWrd.Documents.Open (DocWrd)
On Error GoTo 0
AppActivate suivant
AppWrd.Windows(suivant & ".doc").WindowState = 1
Set AppWrd = Nothing
End Sub

"ga51" a écrit dans le message de news:

re-Bonsoir

J'ai trouvé !!
Il suffit de mettre la propriété ShowModal à False pour tous les
userforms liés.

Par contre quelqu'un pourrait-il me dire pourquoi j'ai une erreur:
"erreur de chargement de dll" sur la ligne de ma proc: " Set appword=New
Word.Application" lorsque je crée une instance word à partir d'excel.
(Le texte saisi dans mon userform est envoyé dans un fichier word):
.............
Dim docword As Word.Document
Dim appword As Word.Application
Set appword = New Word.Application
appword.ShowMe
appword.Visible = True
Set docword = appword.Documents.Open("c:documents and settings.......
...........

Merci de votre aide

Amicalement

ya

Bonsoir,

Merci Youky pour ta réponse.

Mais j'ai une erreur: "Impossible d'afficher une feuille non modale
lorsqu'une feuille modale est affichée"....

J'ai oublié de préciser que l'userform concerné est amené par sélection
dans une listbox et validation sur un premier userform.
Voici un bout de ma proc pour le userform 1:

Private Sub CommandButton1_Click()
If IsNull(ListBox1) Then
............
else
UserForm2.Label1.Caption = "OPTION 1" & Chr(10) &
_UserForm1.ListBox1.Value



Load UserForm2
UserForm2.Show
.............

End If
End Sub

Amicalement

ya


Salut,
Mets la propriété de l'userform.......ShowModaleúlse
tu pourras naviguer de ton textbox aux cellules Excel
pour cela affiche les propriétés de ton userform
Youky

"ya31" a écrit dans le message de news:
#

Bonjour à tout le monde,

Je débute en Vba Excel....Merci beaucoup pour votre aide,

J'ai créé une textbox dans un Userform, qui s'ouvre à partir d'un
bouton




de contrôle, dans un classeur à plusieurs onglets.
Est-il possible une fois la textbox affichée, de naviguer dans les
onglets pour aller prendre des infos et revenir les saisir dans la
textbox. Si oui, quelle est la proc à utiliser ?

La textbox ouverte me bloque l'accès au classeur et aux onglets.

Amicalement.

ya