Příspěvky uživatele


< návrat zpět

Náhodná chyba pri vložení dát Excel -> Word (3.7.2014 10:38)

Dobrý deň,

mám problém, pri vkladaní dát z Excelu do Word dokumentu. Chyba sa objavuje sporadicky a náhodne. Pre vkladanie dát do wordu používam záložky.
Úryvok z programu:

' Inicializácia dát

Set popisexcel = ThisWorkbook
Set popissheet = popisexcel.Worksheets("Popis")
Set namee = popissheet.Range("B7")

Set wdApp = New Word.Application
Set wdDoc = wdApp.Documents.Open("c:\KUKA\Temp\" & stWordReport)
Set namew = wdDoc.Bookmarks("name").Range

If Name_m_fm = True Then
namee.copy ' Nakopírovanie obsahu do clipboardu
With namew
.Select ' Prechod do záložky vo Word dokumente
.PasteSpecial DataType:=wdPasteText ' Vloženie dát
End With
Call ClearClipboard ' Čistenie clipboardu
End If

Takýchto bolokov tam mám asi 20. Občas sa stane, že program zastane v časti ".PasteSpecial DataType:=wdPasteText ' Vloženie dát " s chybou, že nie je možné vložiť dáta, pretože obsah clipboardu je prázdny. Keď však ručne zopakujem procedúru "namee.copy ' Nakopírovanie obsahu do clipboardu" , tak program už pokračuje bezproblémovo. Zo 100 prípadov sa to stane raz, na rozdielnych procedúrach, ktoré su presne takto napísané ako táto uvedená.

Vie niekto pomôcť?


Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.

On-line nástroje