• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Word naar Excel

Status
Niet open voor verdere reacties.

phille125

Gebruiker
Lid geworden
3 aug 2009
Berichten
57
ik heb nogal een grote excel gekregen van een klant waarin in vanalles moet vertalen (fr-nl).
in 1 cel staan er een paar alinea's (dus een paar soft enters).
ik heb een hele kolom in word geplakt en daarin mijn vertaling uitgevoerd.
rekening gehouden met de cellen. nu wil ik de word tekst terug naar excel kopieren, maar bij elke enter slaagt hij een cel over. hoe met ik dit oplossen?

dus 1cel staan verschillende allinea's
in word heb ik rekening gehouden met de cellen.
van word naar excel geeft hij bij elke enter een ander cel.

ik heb een voorbeeld erbij gestoken van excel en word
 

Bijlagen

Hoi,

Ik kan me toch moeilijk voorstellen dat iemand een spreadsheetprogramma gaat gebruiken als tekstverwerker.
Mijn advies zou zijn: gewoon je Word-document opsturen en laat degene die persé zulke lappen tekst in Excel wil hebben dat maar zelf uitzoeken .... tóch?
 
vanveelen,

ik vind dit ook, maar ik denk dat hij de tekst van een database heeft gehaald en dan aan mij heeft gegeven om deze te vertalen. als ik dit direct in excel terug kan zetten kan hij dit direct inladen in zijn database en een word bestand niet.

maar ik je hebt overschot van gelijk. ('k snap dat ook ni)
 
Mijn advies zou zijn: gewoon je Word-document opsturen en laat degene die persé zulke lappen tekst in Excel wil hebben dat maar zelf uitzoeken .... tóch?

Lekker klantvriendelijk

Is wel een lastige. Je zou alle alinea eindes kunnen vervangen door een spatie en dan de tekst plakken in Excel. Maar dan denk ik dat je niet goed uitkomt. Zal nog effe verder zoeken maar verwacht er niks van

Ron
 
Met deze macro in Excel

Code:
Sub tst()
  With GetObject(, "Word.application").documents("fr tekst.doc")
    Cells(1, 1).Resize(.tables(1).Rows.Count) = WorksheetFunction.Transpose(Split(.content, Chr(13) & Chr(7) & Chr(13) & Chr(7)))
  End With
End Sub
Deze macro werkt niet met het doc-bestand dat je als bijlage hebt geplaatst, want daar zitten door jouw plakbewerkingen allerlei ongerechtigheden in.
Noem het Word-bestand met de tabel: 'fr tekst.doc'
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan