Débutant VBA - générer un TXT

Bonjour à tous !

Je souhaiterais automatiser la création d'un .txt par VBA à partir un tableau .

Ce que je voudrais :

Dans un tableau , j’aimerais cocher les choix dispo ,

Cliquer sur le bouton "Fiche" qui démarre une macro

Qui récupère la valeur de premier cellule de chaque ligne cocher ,

Puis l'export vers un même .txt

C'est tout ... ça à l'air simple mais je suis pas doué et débutant dans le VBA

J'arrive à créer ce "fiche.txt" via une "case à cocher" via cette macro :

Sub Texte()

If Range("E7").Value = True Then
Open "p:\fiche.txt" For Output As #1
Print #1, "choix=" & Range("B7").Value
Close #1
End If

End Sub

Çà à le mérite de fonctionner , mais c'est pas du tout pratique , car je vais devoir faire cela manuellement pour chaque ligne ... et à chaque fois que je vais modifier ce fichier ...

Quel genre de code pourrais faire un scan de la colonne "D" , et pour chaque retour de valeur "True" ajouter la première cellule dans le .txt ?

Je pense cela simple mais en faite c'est compliqué ?

Après j'aimerais aussi ne pas voir le retour de valeur ( VRAI / FAUX ) , mais bon je trouverais par moi même ... j'espère ...

Merci pour votre aide ! vous êtes les meilleurs !

bonjour,

une proposition

Sub Texte()
    dl = Cells(Rows.Count, 1).End(xlUp).Row
    Open "p:\fiche.txt" For Output As #1
    For i = 2 To dl
        If Cells(i, "D").Value = True Then
            Print #1, "choix=" & Cells(i, "A").Value
        End If
    Next i
    Close #1
End Sub

Comme je disais les meilleurs !

Enfin merci à toi H2so4 .

Exactement ce que je souhaitais ! Je vais l'adapter et l'utiliser .

Merci d'avoir pris le temps de faire ce code et de ton aide .

Cela pourra surement aider d'autre personne , car malgré mes recherches je n'avais pas trouvé de solution sur internet .

Bye .

Bonjour à tous !

J'ai bien avancé grâce à vous sur ce fichier , mais je but de nouveau .

Dans ce même fichier ( voir copie d'écran en haut ) , je "pointe" les cases à cocher dans la cellule où elle ce trouve , j'ai même automatisé la chose car beaucoup de ligne .

Par contre là ou ça merdouille , c'est que si je remplie quelques lignes supplémentaires et que je trie le tableau par ordre alphabétique , les cases à cochées ne bougent pas , par contre les cellules où elles pointes oui !! et la c'est le drame !

Je souhaiterais "verrouiller" la case à coché à la cellule sur laquelle elle se trouve ...

Une idée ? un conseil ? c'est pas possible ?

Merci d'avance !

Bonjour à tous.

Je ne pense pas que l'on puisse faire suivre les cases à cocher sans un code assez lourd.

Par contre on pourrais remplacer par des fausses cases (Police Windings)

Au double clic en colonne D, on change la valeur (cochée / pas cochée)

Avec une toute petite modification du code de H2so4 tu crée ton .txt.

Cordialement

Finalement , j'ai mis les cases à cocher simplement hors du tableau ( du coup reste fixe ) .

Des fois plus c'est simple et plus ça marche ... enfin bref , merci à tous pour votre aide .

Bonjour à tous

hypnos a écrit :

[...] je trie le tableau par ordre alphabétique , les cases à cochées ne bougent pas , par contre les cellules où elles pointes oui !! et la c'est le drame ! [...]

hypnos a écrit :

[...] j'ai mis les cases à cocher simplement hors du tableau ( du coup reste fixe ) [...]

A mon avis, si tu mets les cases à cocher en dehors du tableau

hypnos a écrit :

[...] les cases à cochées ne bougent pas , par contre les cellules où elles pointes oui [...]

Après, l'important c'est que ce ne soit pas

hypnos a écrit :

[...] le drame ! [...]

Cordialement