XL 2010 Enregistrement feuille Excel en TXT sans les colonnes masquées

[TCO58]

Bonjour,

Dans une feuille Excel j'ai des colonnes masquées, lorsque j'enregistre ma feuille en TXT toutes les colonnes ressortent même les masquées. comment faire pour ne pas les rendre visible non plus dans le fichier TXT ?

Par avance merci pour votre aide.

 

[Staple1600]

Bonsoir le fil

TCO58
Deux pistes à envisager
1) Ne copier que les colonnes "valides" dans une nouvelle feuille qui elle sera enregistrée en fichier TXT
ou
2) Copier toute la feuille puis supprimer sur cette copie les colonnes masquées et enregistrer cette copier en TXT.

 

[patricktoulon]

re
bonsoir
sinon y a l'astuce a tonton patrick

Sub test()
    Dim fichier$, CsvText$, x&, separator$
    ActiveSheet.UsedRange.Copy
    fichier = "C:\Users\polux\Desktop\monfichier.txt"
    separator = ";"
    CsvText = Replace(CreateObject("htmlfile").parentwindow.clipboardData.GetData("TEXT"), vbTab, separator)
    x = FreeFile
    Open fichier For Output As #x
    Print #x, CsvText
    Close #x
    Application.CutCopyMode = False
End Sub

et oui la méthode copy ne prend que ce qui est visible autant en profiter

 

[Staple1600]

Bonsoir patricktoulon

C'est pas l'astuce à patrick, c'est l'astuce que permet Windows
Maciste, passez alors votre chemin

 

[patricktoulon]

bonsoir Staple1600

Ouis dégagez les ma(t)c(ho)

[Toutes versions] Range to CSV en passant par la récupération de la copie de la plage dans le presse papier(clipboard) - Contribuez

il y a quelques temps dysorthographie proposait de récupérer la copie au format texte de la copie d'une plage dans le clipboard il utilisait pour cela les api Windows et cliboard(utilisateurs expérimentés

www.developpez.net

Plage de cellules to cvs or txt or html separteur au choix le tout en une petite fonction - Contribuez

voici une petite fonction que j'ai fait pour m'amuser cette fonction a pour but de sauver (dans un fichier txt ou csv et même en html )une plage de cellules jusque la rien de bien transcendant sauf que cette

www.developpez.net

 

[Staple1600]

Re

Deux liens ? (Why?)
Un troisième alors
Plus de dix ans que l'astuce prend la poussière.
(ici où la-bas who cares ?)
• Je me suis juste manifesté dans le fil pour prévenir ceux qui utilisent Excel sur Mac.
[taquinerie du vendredi soir]
Et non point, pour une bataille d'ego
[/taquinerie du vendredi soir]

 

[patricktoulon]

re
en vba il te faut le parentwindow d'un object application autre que celui d'excel pour fonctionner pour tâter le getclipboarddata ou setclipboarddata

 

[Staple1600]

Re

[moue dubitative]
Le demandeur semble débuter en VBA.
(voir son autre fil où j'ai modifié sa macro initiale)
Est-ce une bonne idée de déjà lui mettre entre les mains du CreateObject et du Open For OutPut ?
Alors qu'il a la sagesse d'utiliser la fonction native d'export en txt d'Excel ?

https://www.excel-downloads.com/threads/macro-enregistrer-sous-sur-le-bureau.20041796/#post-20300158

[/moue dubitative]