dans mon fichier excel en A1 j'ai "Titre de l'INFO"
dans mon fichier excel en B1 j'ai "INFO: blabla"
dans mon userform VOIR j'ai un textbox nommé Type1
dans mon userform VOIR j'ai un textbox nommé Type2
Comment puis en VBA faire une boucle
for bou = 1 to 2
'pour dire
VOIR.type&bou.value = range(bou,1).value
net bou
'suite de la macro qui bien prend bien plus de 2 cas
Va ête un peu tard (de 14 juillet) ce soir mais je crois que la lueur viens de s'allumer. Va pas foutre le feu avec tes étincelles fais gaffe (enfin en bretagne c'est un peu humide ces temps ci) Bon c'est vrai que je suis déconcerté de devoi placer mon code dans le userform mais après tout pourquoi pas Je te tiens au courant au final Grazzie millé signor Vielen dank Denis
Re,
Si justement, le code doit être dans le module associé au UserForm
Cela permet d'avoir directement accès à la collection Controls et à tous les Controles (TextBox, CommandButton, ListBox, ...)
Classeur parti.
hou la ! hou la ! Remettons un peu d'ordre. 1 grand merci de consacrer de ton temps précieux à ce modeste problème mais il vrai que ce modeste problème me prend la tête 2 j'ai contourné le problème en duplicant jusqu'à plus soif un bout de code 3 j'ai bien envie de comprendre comment ça marche alors à partir du 3 des questions le bout de code qui marche chez toi il est où ? (Dans un module je suppose ! Pas dans un userform, à moins que ...) le but pout moi est d'avoir dans un fichier excel, les UF, les modules, les macros dans un module je charge un fichiel N° 2 et c'est avec les données de ce fichier N°2 que je rempli les textbox(s) de mon UF bien sur le fichier n°2 y a plusieurs il faut donc que dans mon module je prenne cela en compte (d'où une boucle) Et puis après je fais encore d'autrs petites bétises dessus avec des select case, etc
bref bla bla et bla bla je veux bien que tu m'envoie ton fichier pour que je voies comment qu'il est fait, et là peut être que dans mon esprit embrumé un légère lueur apparaîtra (ça c'est pas sur) essayons quand même
Re,
Marche très bien chez moi, peux t'envoyer un classeur si tu veux.
Private Sub UserForm_Initialize() For i = 1 To 3 Controls("Type" & i) = Range("A1").Offset(0, i - 1) Next i End Sub
-- Cordialement,
Michel Gaboly www.gaboly.com
Va ête un peu tard (de 14 juillet) ce soir
mais je crois que la lueur viens de s'allumer.
Va pas foutre le feu avec tes étincelles fais gaffe (enfin en bretagne c'est
un peu humide ces temps ci)
Bon c'est vrai que je suis déconcerté de devoi placer mon code dans le
userform
mais après tout pourquoi pas
Je te tiens au courant au final
Grazzie millé signor
Vielen dank
Denis
Re,
Si justement, le code doit être dans le module associé au UserForm
Cela permet d'avoir directement accès à la collection Controls et à tous les
Controles (TextBox, CommandButton, ListBox, ...)
Classeur parti.
hou la ! hou la !
Remettons un peu d'ordre.
1 grand merci de consacrer de ton temps précieux à ce modeste problème mais
il vrai que ce modeste problème me prend la tête
2 j'ai contourné le problème en duplicant jusqu'à plus soif un bout de code
3 j'ai bien envie de comprendre comment ça marche
alors à partir du 3 des questions
le bout de code qui marche chez toi il est où ? (Dans un module je suppose !
Pas dans un userform, à moins que ...)
le but pout moi est d'avoir dans un fichier excel, les UF, les modules, les
macros
dans un module je charge un fichiel N° 2 et c'est avec les données de ce
fichier N°2 que je rempli les textbox(s) de mon UF
bien sur le fichier n°2 y a plusieurs il faut donc que dans mon module je
prenne cela en compte (d'où une boucle)
Et puis après je fais encore d'autrs petites bétises dessus avec des select
case, etc
bref bla bla et bla bla je veux bien que tu m'envoie ton fichier pour que
je voies comment qu'il est fait, et là peut être que dans mon esprit embrumé
un légère lueur apparaîtra (ça c'est pas sur)
essayons quand même
denis.marayon@laposte.net
Re,
Marche très bien chez moi, peux t'envoyer un classeur si tu veux.
Private Sub UserForm_Initialize()
For i = 1 To 3
Controls("Type" & i) = Range("A1").Offset(0, i - 1)
Next i
End Sub
Va ête un peu tard (de 14 juillet) ce soir mais je crois que la lueur viens de s'allumer. Va pas foutre le feu avec tes étincelles fais gaffe (enfin en bretagne c'est un peu humide ces temps ci) Bon c'est vrai que je suis déconcerté de devoi placer mon code dans le userform mais après tout pourquoi pas Je te tiens au courant au final Grazzie millé signor Vielen dank Denis
Re,
Si justement, le code doit être dans le module associé au UserForm
Cela permet d'avoir directement accès à la collection Controls et à tous les Controles (TextBox, CommandButton, ListBox, ...)
Classeur parti.
hou la ! hou la ! Remettons un peu d'ordre. 1 grand merci de consacrer de ton temps précieux à ce modeste problème mais il vrai que ce modeste problème me prend la tête 2 j'ai contourné le problème en duplicant jusqu'à plus soif un bout de code 3 j'ai bien envie de comprendre comment ça marche alors à partir du 3 des questions le bout de code qui marche chez toi il est où ? (Dans un module je suppose ! Pas dans un userform, à moins que ...) le but pout moi est d'avoir dans un fichier excel, les UF, les modules, les macros dans un module je charge un fichiel N° 2 et c'est avec les données de ce fichier N°2 que je rempli les textbox(s) de mon UF bien sur le fichier n°2 y a plusieurs il faut donc que dans mon module je prenne cela en compte (d'où une boucle) Et puis après je fais encore d'autrs petites bétises dessus avec des select case, etc
bref bla bla et bla bla je veux bien que tu m'envoie ton fichier pour que je voies comment qu'il est fait, et là peut être que dans mon esprit embrumé un légère lueur apparaîtra (ça c'est pas sur) essayons quand même
Re,
Marche très bien chez moi, peux t'envoyer un classeur si tu veux.
Private Sub UserForm_Initialize() For i = 1 To 3 Controls("Type" & i) = Range("A1").Offset(0, i - 1) Next i End Sub
-- Cordialement,
Michel Gaboly www.gaboly.com
Michel Gaboly
;-))
Pourquoi crois-tu que les Userform ont un module. De même que les feuilles et le classeur lui-même (ThisWorkbook).
C'est parce que ces modules spécialisés permettent de gérer les événements liés à l'objet associé, et sont le lieu idéal pour manipuler les objets situés sur l'objet (contrôles pour un UserForm, contrôles, Shapes, ... sur une feuille).
Les modules standards (et les modules de classe) servent à tout le reste.
Va ête un peu tard (de 14 juillet) ce soir mais je crois que la lueur viens de s'allumer. Va pas foutre le feu avec tes étincelles fais gaffe (enfin en bretagne c'est un peu humide ces temps ci) Bon c'est vrai que je suis déconcerté de devoi placer mon code dans le userform mais après tout pourquoi pas Je te tiens au courant au final Grazzie millé signor Vielen dank Denis
Re,
Si justement, le code doit être dans le module associé au UserForm
Cela permet d'avoir directement accès à la collection Controls et à tous les Controles (TextBox, CommandButton, ListBox, ...)
Classeur parti.
hou la ! hou la ! Remettons un peu d'ordre. 1 grand merci de consacrer de ton temps précieux à ce modeste problème mais il vrai que ce modeste problème me prend la tête 2 j'ai contourné le problème en duplicant jusqu'à plus soif un bout de code 3 j'ai bien envie de comprendre comment ça marche alors à partir du 3 des questions le bout de code qui marche chez toi il est où ? (Dans un module je suppose ! Pas dans un userform, à moins que ...) le but pout moi est d'avoir dans un fichier excel, les UF, les modules, les macros dans un module je charge un fichiel N° 2 et c'est avec les données de ce fichier N°2 que je rempli les textbox(s) de mon UF bien sur le fichier n°2 y a plusieurs il faut donc que dans mon module je prenne cela en compte (d'où une boucle) Et puis après je fais encore d'autrs petites bétises dessus avec des select case, etc
bref bla bla et bla bla je veux bien que tu m'envoie ton fichier pour que je voies comment qu'il est fait, et là peut être que dans mon esprit embrumé un légère lueur apparaîtra (ça c'est pas sur) essayons quand même
Re,
Marche très bien chez moi, peux t'envoyer un classeur si tu veux.
Private Sub UserForm_Initialize() For i = 1 To 3 Controls("Type" & i) = Range("A1").Offset(0, i - 1) Next i End Sub
-- Cordialement,
Michel Gaboly www.gaboly.com
-- Cordialement,
Michel Gaboly www.gaboly.com
;-))
Pourquoi crois-tu que les Userform ont un module. De même que les feuilles et le
classeur lui-même (ThisWorkbook).
C'est parce que ces modules spécialisés permettent de gérer les événements liés
à l'objet associé, et sont le lieu idéal pour manipuler les objets situés sur
l'objet (contrôles pour un UserForm, contrôles, Shapes, ... sur une feuille).
Les modules standards (et les modules de classe) servent à tout le reste.
Va ête un peu tard (de 14 juillet) ce soir
mais je crois que la lueur viens de s'allumer.
Va pas foutre le feu avec tes étincelles fais gaffe (enfin en bretagne c'est
un peu humide ces temps ci)
Bon c'est vrai que je suis déconcerté de devoi placer mon code dans le
userform
mais après tout pourquoi pas
Je te tiens au courant au final
Grazzie millé signor
Vielen dank
Denis
Re,
Si justement, le code doit être dans le module associé au UserForm
Cela permet d'avoir directement accès à la collection Controls et à tous les
Controles (TextBox, CommandButton, ListBox, ...)
Classeur parti.
hou la ! hou la !
Remettons un peu d'ordre.
1 grand merci de consacrer de ton temps précieux à ce modeste problème mais
il vrai que ce modeste problème me prend la tête
2 j'ai contourné le problème en duplicant jusqu'à plus soif un bout de code
3 j'ai bien envie de comprendre comment ça marche
alors à partir du 3 des questions
le bout de code qui marche chez toi il est où ? (Dans un module je suppose !
Pas dans un userform, à moins que ...)
le but pout moi est d'avoir dans un fichier excel, les UF, les modules, les
macros
dans un module je charge un fichiel N° 2 et c'est avec les données de ce
fichier N°2 que je rempli les textbox(s) de mon UF
bien sur le fichier n°2 y a plusieurs il faut donc que dans mon module je
prenne cela en compte (d'où une boucle)
Et puis après je fais encore d'autrs petites bétises dessus avec des select
case, etc
bref bla bla et bla bla je veux bien que tu m'envoie ton fichier pour que
je voies comment qu'il est fait, et là peut être que dans mon esprit embrumé
un légère lueur apparaîtra (ça c'est pas sur)
essayons quand même
denis.marayon@laposte.net
Re,
Marche très bien chez moi, peux t'envoyer un classeur si tu veux.
Private Sub UserForm_Initialize()
For i = 1 To 3
Controls("Type" & i) = Range("A1").Offset(0, i - 1)
Next i
End Sub
Pourquoi crois-tu que les Userform ont un module. De même que les feuilles et le classeur lui-même (ThisWorkbook).
C'est parce que ces modules spécialisés permettent de gérer les événements liés à l'objet associé, et sont le lieu idéal pour manipuler les objets situés sur l'objet (contrôles pour un UserForm, contrôles, Shapes, ... sur une feuille).
Les modules standards (et les modules de classe) servent à tout le reste.
Va ête un peu tard (de 14 juillet) ce soir mais je crois que la lueur viens de s'allumer. Va pas foutre le feu avec tes étincelles fais gaffe (enfin en bretagne c'est un peu humide ces temps ci) Bon c'est vrai que je suis déconcerté de devoi placer mon code dans le userform mais après tout pourquoi pas Je te tiens au courant au final Grazzie millé signor Vielen dank Denis
Re,
Si justement, le code doit être dans le module associé au UserForm
Cela permet d'avoir directement accès à la collection Controls et à tous les Controles (TextBox, CommandButton, ListBox, ...)
Classeur parti.
hou la ! hou la ! Remettons un peu d'ordre. 1 grand merci de consacrer de ton temps précieux à ce modeste problème mais il vrai que ce modeste problème me prend la tête 2 j'ai contourné le problème en duplicant jusqu'à plus soif un bout de code 3 j'ai bien envie de comprendre comment ça marche alors à partir du 3 des questions le bout de code qui marche chez toi il est où ? (Dans un module je suppose ! Pas dans un userform, à moins que ...) le but pout moi est d'avoir dans un fichier excel, les UF, les modules, les macros dans un module je charge un fichiel N° 2 et c'est avec les données de ce fichier N°2 que je rempli les textbox(s) de mon UF bien sur le fichier n°2 y a plusieurs il faut donc que dans mon module je prenne cela en compte (d'où une boucle) Et puis après je fais encore d'autrs petites bétises dessus avec des select case, etc
bref bla bla et bla bla je veux bien que tu m'envoie ton fichier pour que je voies comment qu'il est fait, et là peut être que dans mon esprit embrumé un légère lueur apparaîtra (ça c'est pas sur) essayons quand même
Re,
Marche très bien chez moi, peux t'envoyer un classeur si tu veux.
Private Sub UserForm_Initialize() For i = 1 To 3 Controls("Type" & i) = Range("A1").Offset(0, i - 1) Next i End Sub