Base de Données Excel et VBA

Question

Bonjour a vous voila mon probleme 

J'ai cr&#233;&#233; une application VBA qui se lance d&#233;s que j'ouvre mon fichier Excel 

Je renseigne mes champs et j'envoie tout dans ma base Excel dans feuille1

Je voudrais sur ce UserForm1, cr&#233;er une combobox dans laquelle j'afficherai un choix
de proposition qui se situe dans une feuille Excel Feuille2 mais dans le meme classeur que mon application.

Exemple : 

Je lance mon application

L'operateur viens renseigner ses champs

Dans le champs couleur : je veux afficher les couleurs pr&#233;alablement enregistr&#233;es dans ma feuille2 et lui permettre de choisir parmi ces valeurs

Il faut donc que je tape par exemple dans ma feuille2 dans la colonne 1 /  ligne 1 &#224; 9

Comment faire cette liaison ? 

J'espere avoir &#233;tait assez clair 

Merci &#224; ceux qui pourront m'aider

takin55 · Answer

Voila j'ai trouv&#233; quelque chose mais je ne sais pas trop comment l'appliquer

surtout le nom des feuilles 

Sub appliexcel()
Dim appExcel As Excel.Application
Set appExcel = CreateObject("Excel.Application")

'ouverture du classeur voulu
Set classeur = appExcel.Workbooks.Open("C:/test.xls")
Set feuille = classeur.Worksheets("Feuil1")

'&#224; partir de la feuille que tu veux tu r&#233;cup&#232;res les valeurs des cellules
'que tu mets dans tes textbox
With feuille
UserForm1.TextBox1.Text = .Range("A1")
UserForm1.TextBox2.Text = .Range("A2")
UserForm1.TextBox3.Text = .Range("A3")
End With

classeur.Close
appExcel.Quit

Set feuille = Nothing
Set classeur = Nothing
Set appExcel = Nothing

UserForm1.Show

End Sub

Base de Données Excel et VBA

1 réponse

Discussions similaires