cs_CanisLupus
Messages postés3757Date d'inscriptionmardi 23 septembre 2003StatutMembreDernière intervention13 mars 200620 11 janv. 2005 à 20:38
Salut
Désolé, je ne comprend pas.
feuille VB, c quoi ? une form VB6, VB7, VBA ? ...
feuille Excel, c quoi ? Feuille de calcul ? Userform ? ...
Tu parles de la "feuille" complète ou de ce qu'elle contient ?
.....
cs_aminix9
Messages postés96Date d'inscriptionmercredi 2 juin 2004StatutMembreDernière intervention 9 février 2010 11 janv. 2005 à 22:44
slt à vous,
j ai une form vb6 que je veu insérer dans une feuille complète d'excel.
est c k il est possible de le faire , car j ai essayé insérer objet dans excel
(menu insertion) mais ca marche pa.
cs_CanisLupus
Messages postés3757Date d'inscriptionmardi 23 septembre 2003StatutMembreDernière intervention13 mars 200620 12 janv. 2005 à 19:51
Salut
Il est possible d'insérer une feuille excel (sous forme d'objet) dans une feuille VB mais l'inverse n'est pas possible à ma connaissance.
Sinon, suivant ce que tu veux réaliser, tu peux :
- faire une capture d'écran de la form VB et l'insérer en tant qu'image mais bon, ça ne sera qu'une image.
- créer une userform dans excel où tu reproduiras la form VB avec les mêmes contrôles et, bien évidemment, le même code derrière ces contrôles.
- si c'est seulement les infos affichées dans la form VB qui t'intéressent, tu peux, à partir de VB envoyer ces infos vers ta feuille Excel.
cs_aminix9
Messages postés96Date d'inscriptionmercredi 2 juin 2004StatutMembreDernière intervention 9 février 2010 12 janv. 2005 à 22:15
slt CanisLupus
j aimerai bien ke tu m explik commen faire la derniere stp:
"si c'est seulement les infos affichées dans la form VB qui t'intéressent,
tu peux,
à partir de VB envoyer ces infos vers ta feuille
Excel."
et merci
aminix
Vous n’avez pas trouvé la réponse que vous recherchez ?
cs_CanisLupus
Messages postés3757Date d'inscriptionmardi 23 septembre 2003StatutMembreDernière intervention13 mars 200620 12 janv. 2005 à 23:01
Hou là, pas la peine de crier !!!
Un exemple :
' dans projet/références......... Microsoft Excel x.x Object Library
Private Sub Command1_Click()
Dim AppExcel As Excel.Application
Dim ClasseurExcel As Excel.Workbook
Dim FeuilleExcel As Excel.Worksheet
Dim FichierXls As String
Dim Feuille As String
' là tu remplaces par tes noms de classeur et de feuille
FichierXls = Chemin_Nom_Tonclasseur
Feuille = Nom_Tafeuille
' Chargement de l'application Excel
Set AppExcel = CreateObject("Excel.Application")
' Ouverture du classeur Excel
Set ClasseurExcel = AppExcel.Workbooks.Open(FichierXls)
' remplissage de qques cellules
With ClasseurExcel.Sheets(Feuille)
.Cells(1, 1) = "toto" ' "toto" dans la cellule A1
.Cells(1, 2) = "truc" ' "truc" dans la cellule B1
End With
' Pour refermer tout proprement
ClasseurExcel.Save 'pour sauvegarder tes modifs sinon :
'ClasseurExcel.Saved = True ' Pour dire que c'est déjà sauvegardé donc pas de sauvegarde
ClasseurExcel.Close
AppExcel.Quit
Set FeuilleExcel = Nothing
Set ClasseurExcel = Nothing
Set AppExcel = Nothing