Lone-wolf
XLDnaute Barbatruc
Bonjour à tous,
Est-il possible de copier-coller du texte Word dans une seule cellule Excel
en concervant la mise en forme du texte.
Je viens de trouver la solution, désolé pour ce message.
Exemple:
Depuis Sub CreerDossiers() jusqu'à Next il y a des retours à la ligne (ALT+Enter) sur le document Word.
A+
Est-il possible de copier-coller du texte Word dans une seule cellule Excel
en concervant la mise en forme du texte.
Je viens de trouver la solution, désolé pour ce message.
Exemple:
Code:
Sub CreerDossiers()
Dim txt$, s, i%
txt = [A1] 'txt = "C:\TEST\DOS1\DOS2"
s = Split(txt, "\")
On Error Resume Next
txt = s(0)
For i = 1 To UBound(s)
txt = txt & "\" & s(i)
MkDir txt
Next
End Sub
Depuis Sub CreerDossiers() jusqu'à Next il y a des retours à la ligne (ALT+Enter) sur le document Word.
A+
Dernière édition: