Discussion :

[alaintoulouse]

Bonjour,
j'ai fais une feuille de saisies données en y incluant des textbox.

Je voudrais récupérer les données de ces textbox. je sais en tapant chaque ligne pour chaque textbox, mais j'aimerais avoir une boucle comme ça même si j'ajoute une textbox ce sera auto.

Ma macro actuelle est toute simple et fonctionne mais la ligne en 'commentaire ne marche pas

J'ai essayer de trouver sur les forums mais à chaque fois c'est sur les textbox dans des uf. mais les miennes sont sur feuille

Quelqu'un a-t-il la solution ? Je joins fichier

Merci

Alain

[tee_grandbois]

bonsoir,
essaie avec

Code :

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

1
2
3
4
5
6
    i = 1
    For Each Ctrl In ActiveSheet.OLEObjects
 
        Destination.Cells(6, i + 1) = Ctrl.Object.Value
        i = i + 1
    Next Ctrl

[alaintoulouse]

Ça marche très bien merci !!

Bonne journée

Alain