Ajout ligne vb

ganbass Messages postés 10 Statut Membre -  
ganbass Messages postés 10 Statut Membre -
Bonjours, une fois de plus une question de débutant.
Je vient de créer un tableau dynamique dont les données sont issues d'un .txt; maintenant je voudrais ajouter une ligne "vierge" (où je viendrais écrire plus tard) entre chaques lignes déjas existantes. Je ne trouve pas la bonne fonction, je me pert dans l'aide et n'arrive pas à voir ce dont j'ai besoin...Qqn peut il m'aider? merci

4 réponses

  1. beldyn Messages postés 189 Statut Membre 19
     
    Salut,
    Qu'utilises-tu comme controle actuellement?? Comment ou avec quoi est crée ton tableau?

    Essaie d'exposer le but de la manoeuvre, "ajouter une ligne dans un tableau" peut avoir plusieurs significations....

    Beldyn
    0
  2. ganbass Messages postés 10 Statut Membre
     
    En fait j'ai un document .txt que je met dans un tableau, chaque lignes d'écriture dans une ligne du tableau. Je voudrais par la suite "créer" une ligne suplémentaire. Après réflexion il faudrais que cette "nouvelle" ligne apparaise dans le document .txt ce serais plus simple.

    Je résume, j'ai un document .txt;il faut que dans celui-ci j'insère une ligne d'écriture (vierge pour le moment, donc " " ). Par la suite je remplirais cette ligne puis il faudras sauver le document sous un autre nom... je suis un peut brouillon mais je débute et l'application à effectuer n'est pas simple donc je m'y prend un peut mal...

    pour répondre à la première question voilà comment j'ai remplis mon tableau:

    Public Sub RemplirTableau()
    Dim tLine() As String
    Dim sFile As String
    Dim numfile As Long
    Dim cptLine As Long
    Dim Taille As Long
    Dim Choix As Integer
    Const StepLine = 100

    sFile = "C:\ESS.TXT"
    cptLine = -1
    numfile = FreeFile

    Open sFile For Input As numfile
    While Not EOF(numfile)
    cptLine = cptLine + 1
    If cptLine = Taille Then
    Taille = Taille + StepLine
    ReDim Preserve tLine(0 To Taille)
    End If
    Line Input #numfile, tLine(cptLine)
    Wend

    'Close numfile
    ReDim Preserve tLine(0 To cptLine)

    End Sub
    0
  3. beldyn Messages postés 189 Statut Membre 19
     
    Ok, je comprends mieux :)
    Au début je pensais que tu affichais un tableau...

    Bon, pour moi, le plus simple serait que tu utilises un tableau tampon que tu remplirais ligne par ligne avec le tableau crée à partir du fichier. Celà te permettra d'ajouter une ligne ou tu veux au moment choisi.
    Ensuite, une fois ton tableau tampon fini, tu le recopies dans ton tableau principal.

    Voilà, si il existe une fonction pour faire ça, je ne la connait pas.
    Bon courage,
    A++

    Beldyn
    0
  4. ganbass Messages postés 10 Statut Membre
     
    Merci pour la coup de pouce et la conduite d'idée, je me voyait partie dans le décors.... a+++
    0