Sujet Précédent Sujet Suivant

Enregistrer contenu de 75 txtbox dans un fchier excel

Résolu/Fermé
tsri_badr_esgi Messages postés 524 Date d'inscription samedi 21 mars 2009 Statut Membre Dernière intervention 26 mai 2014 - Modifié par tsri_badr_esgi le 20/11/2012 à 19:24
Heliotte Messages postés 1491 Date d'inscription vendredi 26 octobre 2012 Statut Membre Dernière intervention 28 janvier 2013 - 21 nov. 2012 à 22:06
Bonjour,

salut mes amis

l'idée :

j'ai un fichier excel qui en effet une facture que je doit remplir chaque fois avec different nom et different article,et blablabla.alors j'ai essayé de faire ça avec vb.net 2010.la facture contient 75 case a remplir chaque fois alors j'ai creé un form avec 75 txtbox et la ou il ya la probleme.

problematique:

si avec mais connaissance je veux remplir tous ces case avec l'instruction suivant

worksheet.range("la case que je specifie").value =Txt_boxN.text (N et le nombre de du TXTbox correspandant a la case demandé)

bon si je veut utilser cetter methode alors je dois creer cette instruction 75 fois.(l'idée est fatiguant meme avant la coder)

question:
y'a t il une autre methode pour faire ça.?

PS:pardonne ma francaise.

je crois que c'est claire

A voir également:

5 réponses

Réponse 1 / 5
Heliotte Messages postés 1491 Date d'inscription vendredi 26 octobre 2012 Statut Membre Dernière intervention 28 janvier 2013 92
20 nov. 2012 à 23:09
ca a l'avantage d'être clair, c'est sûr
Comme tu l'as dit, c'est une façon de faire
Si tu avait VB6, comme les textbox peuvent être indexés, c'était juste un boule, par exemple de 0 à 74
En VB.Net, ton textbox peut se nommer d'un radiacal "Txt_box" & d'un suffixe, tu joues avec des objets (les contrôles textbox) ou plutôt avec les ".name" des contrôles
0
Réponse 2 / 5
tsri_badr_esgi Messages postés 524 Date d'inscription samedi 21 mars 2009 Statut Membre Dernière intervention 26 mai 2014 9
21 nov. 2012 à 15:17
merci bcp Heliotte pour votre idée

mais en effet j'ai reussi de reoudre la probleme avec ce code 
Dim CaseExcel() As String = {"J17", "J18", "J19", "M17", "M18", "C24", "C25", "C26", "C27", "C28", "C29", "C30", "C31", "C32", "C33", "C34", "C35", "C36", "C37", "I24", "I25", "I26", "I27", "I28", "I29", "I30", "I31", "I32", "I33", "I34", "I35", "I36", "I37", "K24", "K25", "K26", "K27", "K28", "K29", "K30", "K31", "K32", "K33", "K34", "K35", "K36", "K37", "L24", "L25", "L26", "L27", "L28", "L29", "L30", "L31", "L32", "L33", "L34", "L35", "L36", "L37", "M24", "M25", "M26", "M27", "M28", "M29", "M30", "M31", "M32", "M33", "M34", "M35", "M36", "M37"}

Private Sub BT_ENREGISTRER_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BT_ENREGISTRER.Click
    
        Dim x As Integer = 1
        Dim i As Integer = 0
        Do
            worksheet.Range(CaseExcel(i)).Value = Me.Controls("TXT" & CStr(x) & "").Text
            x += 1
            i += 1
        Loop Until x = 75 And i = 74
    End Sub


j'avais aucune idée a propos CStr,mais un peu de recherche enrichira ma tete.

j'ai nommée tous mes textbox TXTx ou x et le est un nombre qui va de 1 a 75,comme ça j'ai reussi de remplir la facture depuis VB.net

votre opinion m'interesse plz.
0
Réponse 3 / 5
Heliotte Messages postés 1491 Date d'inscription vendredi 26 octobre 2012 Statut Membre Dernière intervention 28 janvier 2013 92
21 nov. 2012 à 19:05
Dim x As Integer = 1
Dim i As Integer = 0
cela fonctionne-t-il ?
0
Réponse 4 / 5
tsri_badr_esgi Messages postés 524 Date d'inscription samedi 21 mars 2009 Statut Membre Dernière intervention 26 mai 2014 9
Modifié par tsri_badr_esgi le 21/11/2012 à 21:53
oui on peut attribuer une valeur a notre variable des qu'on la declare: c'est pareil a :
dim x as integer
dim i as integer
x=1
i=0
c 'est ça votre question?
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Réponse 5 / 5
Heliotte Messages postés 1491 Date d'inscription vendredi 26 octobre 2012 Statut Membre Dernière intervention 28 janvier 2013 92
Modifié par Heliotte le 21/11/2012 à 22:07
tout à fait, merci
0