enregistrement automatque d'un fichier .xls (vba)

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : enregistrement automatque d'un fichier .xls (vba)

lhonolulu

haaa mes amis les développeurs...lol !
Mon problème c'est qu'avec la méthode ci dessous, excel me demande si je veux enregistrer le fichier. Je voudrais que vba gére ca comme un grand, tout seul ! Et je voudrai aussi pouvoir lui définir un nom (j'ai esseyé objExcel.GetSaveAsFilename et objExcel.name mais ca n'a rien fait)et un chemin...
commen dois-je m'y prendre ? Une indication serait la bien venue.
je "programme" (lol !) avec le vb d'excel 2000.

Code :

Private Sub cmd_Creer_Click()
'je crée mon fichier xls de cette facon:
Dim objExcel As Excel.Application
Dim objBook As Excel.Workbook
Dim objSheet As Excel.Worksheet
Dim objCell As Excel.Range
Set objExcel = New Excel.Application
Set objBook = objExcel.Workbooks.Add
Set objSheet = objExcel.Worksheets.Add
'c'est ici que j'ai fé le teste getsaveasfilename...
Set objCell = Nothing
Set objSheet = Nothing
objExcel.Quit
Set objExcel = Nothing
End Sub

nb : si qq connait la facon pour rentrer le contenu d'une textbox ou autre dans une cellule de ce fichier je preneur et repreneur !
ca doit etre du genre :
Sheets("feuil1" ).Cells(1, 1) = textbox.text mais j'y arrive pas...
Merci merci

Publicité

lhonolulu

j'ai trouvé pour l'enregistrement automatique et le chemin

Code :

Application.DisplayAlerts = False
ActiveWorkbook.SaveAs FileName:="C:\ludovic\autamt2.xls", FileFormat:= _
xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False

si qq sait pour mettre des info dans les cellules ca serait le tip top du tip top...

spysnl

Merci pour l'enregistrement: je cherchais aussi ! :jap:

Pour écrire du texte dans les cellules, j'utilise ça:

Sheets("NomDeLaFeuille" ).Range("A1" )= Texte
=> Ecrit le contenu de la variable 'Texte' dans la cellule A1 de la Feuille 'NomDeLaFeuille'

Tu peux aussi utiliser:

ActiveSheet.Range("A1" ) = Texte
=> Idem sauf que ça prend en compte la feuille active quel que soit son nom

NB: 'Range' est normalement utilisé pour désigner un ensemble de cellules contigues... mais ça marche très bien pour une seule ! :bounce:

EDIT: J'ai relu ta question. En fait, je pense qu'il faut que tu précises la form dans laquelle tu as placé ta textbox...
genre: frmMain.TextBox1.text

Message édité par spysnl le 24-11-2004 à 15:57:33

FORUM HardWare.fr

Programmation

VB/VBA/VBS

enregistrement automatque d'un fichier .xls (vba)

Sujets relatifs
[ORACLE] Comment charger un fichier texte dans une table ?	création d'un fichier XMl avec MSXML
boite de dialogue pb: sélection automatique de fichier(s)	[Perl] parcourir un fichier à partir d'une certaine ligne
Comment entrer dans un formulaire un fichier depuis son dur	C++ : Comment copier une valeur d'un fichier .txt et le coller...
[ PHP ] Système de "vu" / "non vu" sans enregistrement de membre	Lancer plusieurs applications via un seul fichier
modifier un fichier XML	Créer un fichier texte
Plus de sujets relatifs à : enregistrement automatque d'un fichier .xls (vba)

Page générée en 0.045 secondes