Relier VB à Excel
marlene
-
gbinforme Messages postés 14930 Date d'inscription Statut Contributeur Dernière intervention -
gbinforme Messages postés 14930 Date d'inscription Statut Contributeur Dernière intervention -
bonjour,
j'ai un problème sous VB, je m'explique : j'ai une feuille avec des représentants avec leur nom,prénom... dans cette feuille il y a un bouton qui sert a m'envoyé sur une fiche de paie, dans cette nouvelle feuille je doit remplir le salaire...tous ce qui me sert à calculé le montant de la rémunération, une fois que ceci est fait je voudrait que en cliquant sur un bouton j'ai une feuille excel qui s'affiche avec dedans tous ce que j'ai rempli sous vb.
ce que je veux c'est :
- savoir comment relier mes deux feuilles
- comment faire pour mettre dans les cellules excel ce que j'ai rempli sous VB
si vous pouviez m'aider ça me sauverai
merci d'avance
j'ai un problème sous VB, je m'explique : j'ai une feuille avec des représentants avec leur nom,prénom... dans cette feuille il y a un bouton qui sert a m'envoyé sur une fiche de paie, dans cette nouvelle feuille je doit remplir le salaire...tous ce qui me sert à calculé le montant de la rémunération, une fois que ceci est fait je voudrait que en cliquant sur un bouton j'ai une feuille excel qui s'affiche avec dedans tous ce que j'ai rempli sous vb.
ce que je veux c'est :
- savoir comment relier mes deux feuilles
- comment faire pour mettre dans les cellules excel ce que j'ai rempli sous VB
si vous pouviez m'aider ça me sauverai
merci d'avance
15 réponses
-
-
ben en fait il faut que chaque partie de ta feuille vb soit relier a une cellule
par exemple :
tu met sur ta feuille vb une zone de texte ou tu inscrit le salaire brut
cette zone tu l'appel salairebrut
dans ta feuille excel le salaire brut dois se trouver dans la cellule c2
pour que ton bouton marche ,d'abord tu le créer et ensuite tu fais un double clic dessus
tu arrive dans la page de code avec inscirt
private sub commandbutton1_click()
end sub
entre c 2 lignes tu tape
range("c2").value=salairebrut.text -
si je comprend bien le code : range("c2").value=salairebrut.text, je le met dans mon code de mon bouton.si je click sur ce bouton ma feuille excel avec la fiche de salaire ne va pas s'afficher?
-
tu travaille sous vb ou sous vba
si c vb cette formule ne marche
si c sous vba il faut ouvrir automatiquement ta feuille -
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question -
-
on m'a indiqué la fonction shellexecute, quelqu'un peut me dire a quoi elle sert et comment on s'en sert pour ouvrir une feuille excel et la remplir grace a vb
-
Bonjour,
Il faut comprendre que VBA et VBS sont des sous ensembles
de VB. Tu trouveras sur le lien ci-dessous un exemple de
pilotage de Excel à partir de VBS. Tu n'auras qu'a utiliser
les déclaration d'objet, pour piloter Excel à partir de VB.
http://www.oricom.ca/lupin/document/excelvbs.txt
Lupin
~L'essentiel est invisible pour les yeux~
~On ne voit bien qu'avec le coeur~ -
ca me donne pas grd chose ça, j'y comprend rien
ce qu'il me faudrai c juste le code pour qque en entran un salaire brut ds un textbox ds vb, que ca mette ce salaire brut ds ma cellule excel
personne ne connait shellexecute? -
re :
Sous VB :
Tu déclare des variables :
Dim xlApp,xlBook,xlWks,xlRange As Variant
'Tu défini un objet Excel
Set xlApp = CreateObject("Excel.Application")
'Tu défini un objet sur ton fichier
Set xlBook = xlApp.Workbooks.Open("MonFichier.xls")
'Tu défini un objet sur la feuille
Set xlWks = xlBook.Worksheets("MaFeuille")
'Tu défini la plage de travail
Set xlRange = xlWks.Range("A1:A65535")
xlRange.Cells(MaLigne,MaColonne).Value = MonTextBox.text
Est-ce plus clair ?
Lupin
~L'essentiel est invisible pour les yeux~
~On ne voit bien qu'avec le coeur~ -
oui merci je vai essayé
par contre "Excel.application" et "ma feuille" je met n'importe quel nom??
en tt cas merci bcp pr ton aide -
re :
"Excel.Application" est une classe connu de VB,
tu recopie textuellement.
"MaFeuille", oui tu mets le nom de la feuille qu'il
y a dans ton classeur "MonFichier.xls".
Set xlBook = xlApp.Workbooks.Open("MonFichier.xls")
Noublie pas de fermer ton classeur :
xlBook.Save
xlApp.Quit
Set xlRange = Nothing
Set xlWks = Nothing
Set xlBook = Nothing
Set xlApp = Nothing
Lupin
~L'essentiel est invisible pour les yeux~
~On ne voit bien qu'avec le coeur~ -
-
re :
Il s'agit ici de libérer la mémoire affecter a une variable,
si l'on ne libère pas ces variables, à la longue, on gruge
la mémoire active, dans le cas d'une routine récursive, la
mémoire sature en un rien de temps et l'application plante.
Lupin
~L'essentiel est invisible pour les yeux~
~On ne voit bien qu'avec le coeur~ -
-
j'ai un projet de fin détude concernant <bulletin de paie > qui sera mis en vb et access
je voudrais des informations concernant celle-ci
cest à dire des codes
et merci
