begin process at 2012 02 17 08:08:57
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Base de Donnees

 > CREER UN FICHIER EXCEL ET/OU AJOUTER DES ENREGISTREMENTS (VB.NET)

CREER UN FICHIER EXCEL ET/OU AJOUTER DES ENREGISTREMENTS (VB.NET)


 Information sur la source

Note :
5,25 / 10 - par 4 personnes
5,25 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Base de Donnees Source .NET ( DotNet ) Niveau :Débutant Date de création :18/01/2005 Vu / téléchargé :26 591 / 4 629

Auteur : guyvdv

Ecrire un message privé
Site perso
Commentaire sur cette source (16)
Ajouter un commentaire et/ou une note

 Description

Bonjour

Cela est un petit code qui peut creer un fichier excel avec le nom des colonnes(champs)
ou ajouter des records .
Je n'ai pas mis le fichier 'interop_excel.dll'
Vous devait alors ajouter la reference Microsoft Excel 11.0 qui pese 1.3 Mo et qui est inutile pour eus qui ont vb.net sur leurs machine.

Cela ma fai plaisir de pouvoir faire qc pour le forum ou je vient souvent piquer des idées

A+
guy van der velden



 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Sources du même auteur

Source avec Zip Source .NET (Dotnet) SOLUTION DE TOUS LES SUDOKU ,RECURSIVE, TRES BIEN COMMENTÉ
Source avec Zip Source .NET (Dotnet) SUDOKU SOLVER EN VB.NET2005 EXPRESS , PLUSIEURS SOLUTION POS...
Source avec Zip Source .NET (Dotnet) GLISSER UN TEXT D'UN TREEVIEW VERS UN LISTBOX
Source avec Zip Source .NET (Dotnet) CREATION DUN FICHIER.WAV EN VB.NET
Source avec Zip CREER/AJOUTER TEXT, IMAGE, TABLEAU WORDART WORD DOCUMENT EN ...

 Sources de la même categorie

Source avec Zip Source avec une capture BIEN ADMINISTRER LES ETUDIANTS ET LEURS CÔTES par okosa
Source avec Zip VBA EXEL GESTION DE PERSONEL NOUVEAU CONTRAT DE TRAVAI par oudlarbi
Source avec Zip Source avec une capture CREATION D'UN OBJET D'ACCÈS AUX DONNÉES par okosa
Source avec Zip Source .NET (Dotnet) MISAHORAIRE par MdelM
Source avec Zip Source avec une capture BASEDEDONNEES,GESTIONDEMALADES,DATABASSE par shadkitenge

Commentaires et avis

Commentaire de madbob le 18/01/2005 18:57:36

Bonjour guyvdv et bonne année vous et à la p'tiote dernière
et... merci pour le source.

Comme quoi l'informatique ça nous fait rester jeune. Des preuves : je n'ai pas encore .net mais je vous rejoins par la pensée.

Cordialement
madbob

Commentaire de guyvdv le 19/01/2005 17:19:37

merci et a bientot en .net
Guy

Commentaire de olixelle le 20/01/2005 21:04:55

a mon avis ya une facon largement plus ".net" d'écrire ca.... jvé chercher pis jvous tient au courant si c le cas :)

Commentaire de guyvdv le 21/01/2005 09:38:52



c'est vrai, je suis debutant en vb.net et surtout en programmation object
J'attend avec impatience ton code

A+
guy

Commentaire de max68 le 22/02/2005 11:47:58

Alala, heureusement qu'il y a des anciens pour apprendre aux jeunes ;)

Merci beaucoup, Guy, votre source m'a énormément aidé pour mon app'.

Cordialement,

Commentaire de Microsux le 04/07/2005 10:46:40

Pareil que Max Guy, ton code m'a bien aide pour mon prog.
Bonne continuation,a+

Commentaire de Drikce06 le 03/04/2007 15:26:12

Salut, effectivement la manière dont excel est manipulé ici n'est du .Net mais plus du vb6!
En VB.Net fini les creatobject! (d'ailleur faut que je modifie une de mes sources)!

Créer une instance d'excel par exemple:

Dim XlsApp As Excel.Application
XlsApp = New Excel.Apllication

Commentaire de Drikce06 le 03/04/2007 15:26:53

Ok j'avais pas vu que la source avait plus de 2 ans!

Commentaire de Adn56 le 24/10/2007 15:09:17 8/10

Cela marche tres bien sous 2005express ! Merci bien pour cette exemple.
Reste en effet à le modifier comme le dis Drikce06, dont j'attends les mise à jours avec impatience :p
Pourrais tu faire un pti post la dessus ? d'avance merci.
Je me vais essayer de chercher des valeurs dans une feuille xls, via ton code ;)
++

Commentaire de Adn56 le 24/10/2007 16:23:28

j'ai rajouté un petit code de recherche, mais je le trouve trop lent et surtout il faut bien écrire ce que l'on recherche ! sinon que kouik, alors que sous excel on peut rajouter des "*" devant et derriére la valeur à chercher. enfin à suivre....

' ouverture du fichier xls contenu dans la variable FNxls
'Dim oXL  As Excel.Application
'oXL  = New Excel.Apllication
        oXL = CreateObject("Excel.Application")
        oXL.Workbooks.Open(filename:=FNxls)
        oSheet = oXL.ActiveSheet '

        ' dimension de la feuille pour recherche
        Dim RowMax As Integer = oSheet.UsedRange.Rows.Count 'nombre de lignes rempli dans la feuille
        Dim ColMax As Integer = oSheet.UsedRange.Columns.Count 'nombre de colonnes dans la feuille
        Dim value As String = Nothing
        For colonne As Integer = 1 To ColMax
            For ligne As Integer = 1 To RowMax
                value = oSheet.cells(ligne, colonne).value
                If TextBox2.Text = value Then
                    message = " trouvé en ligne " & ligne & " de la colonne " & colonne
                    Exit For
                End If
            Next
        Next
        MsgBox(message)
        oXL.Quit()
        oSheet = Nothing
        oBook = Nothing
        oXL = Nothing

Commentaire de fcuk76 le 19/06/2008 11:00:45

Salut, bien la source c'est exactement ce qui va me permettre d'avancer, par contre j'ai un soucis, il me met un "declaration attendu" pour le oxl de "oxl = createObject..."

Quelqu'un sait pourquoi ?

Merci

Commentaire de max68 le 20/06/2008 02:20:50

salut fcuk76,

si mes souvenirs sont bons, je crois que c'est un pb de déclaratin de la variable, et en lisant le post d'adn56, il y a une faute de frappe à la 3e ligne:
'oXL  = New Excel.Apllication

supprime le premiere caractere, cad l'apostrophe. Ce n'est pas un commentaire, mais bien une déclaration de l'objet.

voili voilou, j'espere avoir trouvé la solus,

a+

Commentaire de fcuk76 le 20/06/2008 04:11:01

Merci pour cette réponse Max68,

J'arrive maintenant à écrire dans un document Excel, maintenant il me faut lire dedans et là c'est pas évident, quand je veux lire une cellule j'ai une erreur de "type", les cellules semblent être toutes de type "range" et quand je veux mettre leur contenue dans une "string" j'ai une erreur. Une idée ?

Et sinon lorsque j'ai fini de travailler sur ma page et que je la ferme, le process Excel.exe reste lancé, et un pour chaque page ouverte, j'ai trouvé un code (assez long) pour les chercher et les kill, il n'y a pas une méthode plus simple ?

Merci d'avance

A+

Commentaire de Adn56 le 20/06/2008 18:56:02

ouep, dsl je pige plus pourquoi je l'ai mis en commentaire :p
enfin c'est corrigé ^^

Commentaire de bidouille007 le 16/08/2009 16:05:25 6/10

intéressant pour un début.

Juste que le projet converti en VB 2008 indique quelques erreurs non bloquantes des variables non utilisées d'autres utilisées avant d'avoir eu une affectation et une histoire  wrappers personnalisés mis à jour sont disponibles pour les composants référencés suivants : Excel.

Y a pas moyen d'avoir la même chose directement exploitable en vb 2008 ?

Commentaire de Adn56 le 16/08/2009 17:52:49

perso, je n'utilse plus ce genre de manip, j'écris directement un fichier CSV, c'est bien plus simple, rapide, 100% .NET et lisible par toutes les versions d'excel. (double clic sur le fichier et excel l'ouvre dans un classeur, une ptite macro pour la mise en page/forme et hop)
voici un extrait de code d'une source de datalogger que je posterais sous peu. cordialement.

            ' création du fichier pour excel ( nom du fichier puis : date et heure; courbe1 à 8; les 5 entrées TOR et le retour_chariot)
            File.AppendAllText(nom_data, Now.ToString & ";" & y.ToString & ";" & y2.ToString _
                               & ";" & y3.ToString & ";" & y.ToString & ";" & y2.ToString _
                               & ";" & y3.ToString & ";" & y.ToString & ";" & y2.ToString _
                               & ";" & in1 & ";" & in2 & ";" & in3 & ";" & in4 & ";" _
                               & in5 & ";" & vbCrLf)

 Ajouter un commentaire




Nos sponsors


Sondage...

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 1,030 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales