AccueilCodesTutorielsForumsEmploiLivresConnexion

  • Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS
  • RSS CodeS-SourceS
  • CodyxBot, le Bot GTalk & MSN qu'il vous faut !
  • Générez des revenus avec vos codes, scripts et tutoriaux
  • Aide à la navigation du site
begin process at 2008 12 02 22:21:20
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

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


Information sur la source

Catégorie :Base de Donnees Source .NET ( DotNet ) Niveau : Débutant Date de création : 18/01/2005 Vu / téléchargé: 21 068 / 4 103
Auteur : guyvdv Site perso
Ecrire un message privé
Note :
5 / 10 - par 3 personnes
5,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Commentaire sur cette source (14)
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

Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip

Commentaires et avis

signaler à un administrateur
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

signaler à un administrateur
Commentaire de guyvdv le 19/01/2005 17:19:37

merci et a bientot en .net
Guy

signaler à un administrateur
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 :)

signaler à un administrateur
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

signaler à un administrateur
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,

signaler à un administrateur
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+

signaler à un administrateur
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

signaler à un administrateur
Commentaire de Drikce06 le 03/04/2007 15:26:53

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

signaler à un administrateur
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 ;)
++

signaler à un administrateur
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

signaler à un administrateur
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

signaler à un administrateur
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+

signaler à un administrateur
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+

signaler à un administrateur
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é ^^

Ajouter un commentaire

Nos sponsors

Sondage...

CalendriCode

Décembre 2008
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode


Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, 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
Temps d'éxécution de la page : 0,234 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.