PC Fórum

Excel -> Word export makró
50

2013-09-03T02:43+02:00
T700
T700PC Fórum
regisztrált tag
2013-09-03T02:43+02:00
Excel táblázatból adatokat szeretnék átvinni (amelyek nem egész számok) word-be, a CustomDocumentProperties segítégével (A Word dokumentumban mezőkbe írom az adatokat.) az alábbi módon:

obj.CustomDocumentProperties.Add _
Name:="név",
Value:=Worksheets("adatok").Cells(1, 1).Value, _
Type:=msoPropertyTypeString, LinkToContent:=False

Az a gond, ha nem egész a szám, amit átviszek, akkor a tizedes vessző helyett pont jelenik meg a Word-ben.
Próbáltam beállítani, hogy az excel cella, amiben a szám van "szöveg" legyen, de akkor is a vesszőből pont lesz a word-ben. Mi lehet a megoldás ?
Mutasd a teljes hozzászólást!
Excel -> Word export makró
2013-09-03T02:43+02:00
T700
T700PC Fórum
regisztrált tag
2013-09-03T02:43+02:00
2009-02-09T14:03+02:00
2009-02-09T14:03+02:00
Illetve van a replace("KARAKTERSOROZAT","MIT CSERÉLJEN","MIRE") függvény, mellyel:

cells(1,1) = "4,567"
cells(2,1) = replace(cells(1,1),",",".")

eredmény: 4.567

Excelnél be kell állítanod, hogy a cellatartomány szöveg legyen, különben automatikusan számmá formázza.

Wordnél, ha valamilyen objektumba viszed, akkor a replace() függvénnyel át tudod alakítani, de szerintem ha a számot sztringként viszed, akkor nem fogja számmá konvertálni.

Mutasd a teljes hozzászólást!

abcd