Importer les lignes d'une textbox dans une feuille excel
cs_mustik
Messages postés35Date d'inscriptionmercredi 1 novembre 2006StatutMembreDernière intervention 5 janvier 2007
-
3 janv. 2007 à 15:16
cs_mustik
Messages postés35Date d'inscriptionmercredi 1 novembre 2006StatutMembreDernière intervention 5 janvier 2007
-
5 janv. 2007 à 09:59
Bonjour,
J'aimerais importer mes lignes que j'ai introduit dans ma textbox dans une feuille excel qui n'est encore pas créer. Comment pourrais-je faire? J'aimerais que quand je clique sur mon bouton "importer sous excel" ça me créer une feuille excel et que ça écris ce que j'ai dans ma textbox.
Merci d'avance.
A voir également:
Importer les lignes d'une textbox dans une feuille excel
cs_mustik
Messages postés35Date d'inscriptionmercredi 1 novembre 2006StatutMembreDernière intervention 5 janvier 2007 3 janv. 2007 à 15:33
Merci jmfmarques,
mais seulement je n'ai pas compris grand chose. Ca serait bien si quelqu'un pourrais mieux m'expliquer en plus simple???
Merci d'avance.
drikce06
Messages postés2236Date d'inscriptionlundi 29 mai 2006StatutMembreDernière intervention29 mai 200810 3 janv. 2007 à 15:56
Salut!
Tu veux couper le texte de ta textbox ou tout simplement mettre le text dans une cellule?
Si c'est 1 simple en faisant une recherche ici et sur codyx.
Si c'est 2 super simple en faisant une recherche ici et sur codyx.
Après s'il y a une difficulté de plus quelque part, fais le nous savoir!
Cherche du coté créer un feuille excel...
Drikce 06
Si la réponse vous convient: Réponse acceptée. Si la réponse vous convient pas:
cs_mustik
Messages postés35Date d'inscriptionmercredi 1 novembre 2006StatutMembreDernière intervention 5 janvier 2007 3 janv. 2007 à 16:17
Salut drikce06,
Merci mais sur ce forum y a pas grand chose part raport a ca... En tout cas j'ai pas trouvé... J'aimerais copier les lignes que j'ai dans ma textbox dans une feuille excel qui n'est pas encore créer.
Si vous avez un lien ou une solution. J'accepte volontiers
Merci d'avance.
Vous n’avez pas trouvé la réponse que vous recherchez ?
jmfmarques
Messages postés7666Date d'inscriptionsamedi 5 novembre 2005StatutMembreDernière intervention22 août 201427 3 janv. 2007 à 17:42
Question simple, Mustik :
Oublions un instant le code...
Sais-tu le faure manuellement (VBA n'étant à ce stade pas encore concerné) ?
Dricke06 t'a par ailleurs posé une question simple mais restée sans réponse de ta part ...
Copier tout dans une seule cellule est une chose...
Répartir ton texte entre plusiseurs cellules en est une autre...
Les deux "affaires" sont simples, mais, si tu veux les comprendre bien, il faut qu'au moins tu saches le faire manuellement (sans code donc pour l'instant)
cs_mustik
Messages postés35Date d'inscriptionmercredi 1 novembre 2006StatutMembreDernière intervention 5 janvier 2007 3 janv. 2007 à 18:09
Jmfmarques je sais tres bien faire manuellement!!! Seulement je veux faire ça en code. J'aimerais copier les quelques lignes qu'il ya dans la textbox dans fichier excel. Je trouve que cette phrase veut dire que je veux copier ces plusieurs lignes dans un fichier excel dans plusieur cellule.
Exemple:
Papeterie
Materiel
Nettoyant
etc...
J'espère que cette fois ci j'ai était claire. J'attends votre réponse. Aussi j'aimerais en meme temps creer le fichier il n'existe toujours pas!
Merci d'avance.
cs_mustik
Messages postés35Date d'inscriptionmercredi 1 novembre 2006StatutMembreDernière intervention 5 janvier 2007 4 janv. 2007 à 15:18
Drikce06 merci mais les j et le worksheets ça correspond a quoi?
Je ne veux pas mettre les mots(nettoyer,balayer) à la main dans le code. je veux que ce soit l'utilisateur qui le met. Merci d'avance.
cs_mustik
Messages postés35Date d'inscriptionmercredi 1 novembre 2006StatutMembreDernière intervention 5 janvier 2007 5 janv. 2007 à 07:28
Bonjour, j'aurais une question sur ce code:
Dim Appli As Excel.Application dans mon vb 2005 expres ça me souligne excel.application et ça me dit que je peux le changer à system.applicationid
Dim classeur As Excel.Workbook ça souligne aussi excel.workbook
Dim feuille As Excel.Worksheet Ca aussi excel.worksheet
Dim tmp1, tmp2, tmp3 as String
Set Appli = CreateObject("Excel.application")
Appli.Visible = True
Appli.DisplayAlerts = False
'Ouverture du classeur
Set classeur = Appli.Workbooks.Open(C:\Destination de ton fichier excel)
Set feuille = classeur.Worksheets(1)
tmp1 = feuille.Cells(2, 1)
tmp2 = feuille.Cells(m + 3, 1)
If feuille.Cells(13, 1) = "-FIN-" Then
tmp3 = feuille.Cells(12, 1)
Else
tmp3 = feuille.Cells(13, 1)
End If
cs_mustik
Messages postés35Date d'inscriptionmercredi 1 novembre 2006StatutMembreDernière intervention 5 janvier 2007 5 janv. 2007 à 08:57
drikce06 merci pour ta syntaxe et pour tes efforts... mais ça ne marche pas il me dit que Microsoft.Office.Interop.Excel.Application n'est pas définie lol...
j'aimerais te rappeler que je suis en vb 2005 express