Insérer une feuille vb dans une feuille excel
cs_aminix9
Messages postés
96
Date d'inscription
mercredi 2 juin 2004
Statut
Membre
Dernière intervention
9 février 2010
-
11 janv. 2005 à 12:45
cs_CanisLupus Messages postés 3757 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 13 mars 2006 - 12 janv. 2005 à 23:01
cs_CanisLupus Messages postés 3757 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 13 mars 2006 - 12 janv. 2005 à 23:01
A voir également:
- Insérer une feuille vb dans une feuille excel
- Appeler une cellule d'une autre feuille excel - Forum Visual Basic
- Vba récupérer valeur cellule d'une autre feuille ✓ - Forum Visual Basic
- Prendre la valeur d'une cellule dans excel avec vba - Forum Visual Basic
- Copier automatiquement une cellule excel dans une autre feuille (vba) - Forum VB.NET
- Excel appeler cellule autre feuille ✓ - Forum VBA Office (Excel, Word ...)
5 réponses
cs_CanisLupus
Messages postés
3757
Date d'inscription
mardi 23 septembre 2003
Statut
Membre
Dernière intervention
13 mars 2006
20
11 janv. 2005 à 20:38
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 ?
.....
Expliques-toi mieux stp.
Cordialement, CanisLupus
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 ?
.....
Expliques-toi mieux stp.
Cordialement, CanisLupus
cs_aminix9
Messages postés
96
Date d'inscription
mercredi 2 juin 2004
Statut
Membre
Dernière intervention
9 février 2010
11 janv. 2005 à 22:44
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.
aminix
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.
aminix
cs_CanisLupus
Messages postés
3757
Date d'inscription
mardi 23 septembre 2003
Statut
Membre
Dernière intervention
13 mars 2006
20
12 janv. 2005 à 19:51
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.
Cordialement, CanisLupus
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.
Cordialement, CanisLupus
cs_aminix9
Messages postés
96
Date d'inscription
mercredi 2 juin 2004
Statut
Membre
Dernière intervention
9 février 2010
12 janv. 2005 à 22:15
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
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 ?
Posez votre question
cs_CanisLupus
Messages postés
3757
Date d'inscription
mardi 23 septembre 2003
Statut
Membre
Dernière intervention
13 mars 2006
20
12 janv. 2005 à 23:01
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
End Sub
Cordialement, CanisLupus
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
End Sub
Cordialement, CanisLupus
