Gegevens uit een Tabel in Word halen en in Excel zetten.

Status
Niet open voor verdere reacties.

DutchOirs

Gebruiker
Lid geworden
30 sep 2009
Berichten
890
Goedenavond iedereen.

Zit met het volgende probleem.
Moet gegevens halen uit een Tabel in Word en deze vervolgens in Excel neerzetten.

Op zich werkt het wel, maar zit met het probleem dat hij achter de variabele die hij op haalt een "rondje" en een spatie neerzet.
Krijg met geen mogelijkheid dit weg.
Probeer met onderstaande de gegevens op te halen:

Code:
#>
1e poging met
  LngCel3 = Len(.tables(1).Rows(4).Cells(2))                   ' bepaald de lengte van Locatie         
  ActiveWorkbook.Worksheets("DBase").Range("X" & c.Row) = Left(.tables(1).Rows(4).Cells(2), (LngCel3 - 1))     ' Locatie
2e poging met
   ActiveWorkbook.Worksheets("DBase").Range("X" & c.Row) = .tables(1).Rows(4).Cells(2)     ' Locatie
#>

Beidde pogingen werken dus, de variabele wordt opgehaald, maar het rondje met spatie blijft mee komen.
Als iemand hier iets mee weet?

Al reeds many thanks.
Dutch
 
Probeer het eens zo:
Code:
ActiveWorkbook.Worksheets("DBase").Range("X" & c.Row) = WorksheetFunction.Clean(.tables(1).Cell(4, 2).Range.Text)
 
Hee thanks AHulpje, werkt perfect.

bedankt voor het meedenken en weer wat geleerd :)
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan