Discussion :

[stephlinternaute]

bonjour a tous
je suis tout nouveau dans le forum et surtout en VBA

j'ai recuperé des fichiers ici et la, j'ai fais qq modif mais j'ai des soucis pour compiler plusieur macro et programmer certaines

je joins 3 fichiers

formulaire vide correspond a ce que je veux faire comme formulaire le pb est qu'il est vide car je ne sais pas appliquer les indic dans les combox

il faut juste garder la page accueil, l'userform, et la page données

il faut cliquer sur l'image pour acceder a l'administration code "***"

le deuxieme fichier est que je voudrai recuperer les info saisies dans l'userform et pouvoir les consulter et modifier, l'exemple "comptoir" me paraissait bien

enfin le troisieme correspond au titre d'info qu'il doit y avoir dans l'userform

je ne demande pas qu'on me fasse tout le travail, mais juste un exemple de chaque pour que je comprenne le principe et ensuite le terminer moi meme

si vous avez compris ce que je demande vous avez deja gagné une medaille



d'avance merci a ceux qui pourront m'aider, c'est tres important pour moi

Steph

[stephlinternaute]

qui pourra m'aider d'avance merci

[zazaraignée]

qui pourra m'aider d'avance merci

Les tutoriels et la FAQ dans un premier temps.

[stephlinternaute]

j'ai deja consulté la FAQ et les tuto
mais je ne dois pas savoir chercher car je n'ai pas reglé mon pb

desole pour le derangement

[SilkyRoad]

bonjour

formulaire vide correspond a ce que je veux faire comme formulaire le pb est qu'il est vide car je ne sais pas appliquer les indic dans les combox

Il existe plusieurs solutions pour alimenter une ComboBox

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub UserForm_Initialize()
    Dim i As Byte
 
    For i = 2 To 10
        ComboBox1.AddItem Cells(i, 1)
    Next i
End Sub

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub UserForm_Initialize()
    ComboBox1.RowSource = "Feuil1!A2:A10"
End Sub

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub UserForm_Initialize()
    ComboBox1.List() = Range("A2:A10").Value
End Sub

D'autres informations au sujet des userforms et des contrôles

http://silkyroad.developpez.com/VBA/ControlesUserForm/

http://silkyroad.developpez.com/VBA/UserForm/



michel

[stephlinternaute]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub UserForm_Initialize()
    ComboBox1.RowSource = "Feuil1!A2:A10"
End Sub

j'ai essayé celui ci
mais je n'arrive pas avoir la liste (j'ai changé feuill1 par le nom de ma feuille et j'ai mis la colonne
mais j'ai rien dans ma combox

faut dire que je debute, alors je vais lire tes tuto qui ont l'air tres bien fait
encore merci de m'avoir repondu