< návrat zpět

MS Excel


Téma: VBA script pro přenos do clipboardu rss

Zaslal/a 3.4.2019 9:35

MapeAhoj,
snažím se jako skutečný amatér napsat jednoduchý script, který vybranou oblast v Excelu pošle do clipboardu pro potřebu vložení do wordu, nebo jinam. Problém, který neumím vyřešit nastává ve chvíli kdy je součástí obrázek.
Script vypadá takto:

Sub ToClipboard()

Dim lr As Long
Dim lc As Long

lr = ActiveSheet.Range("B3").End(xlDown).Row
lc = ActiveSheet.Range("B7").End(xlToRight).Column

Workbooks(Export).Worksheets(ExportList).Range("B3", ActiveSheet.Cells(lr, lc)).Copy

MsgBox "Vložte pomocí CTRL+V do Wordu. Až pak klikněte na OK"

Application.DisplayAlerts = False
Workbooks(Export).Close
Application.DisplayAlerts = True

End Sub



A teď k tomu problému. Pokud ten výběr vložím ve chvíli kdy jsem si tam dal ten msgbox tak je vše OK, ale jak se pokusím o vložení po uzavření sešitu, tak je rázem po obrázku.
Dokážete mi prosím někdo poradit?
Soubory v příloze:

Příloha: rar43088_test.rar (33kB, staženo 16x)

Uživatelské menu

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

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

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

Aktivní diskuse

odpocet a storno tl.

PavDD • 28.3. 8:53

odpocet a storno tl.

Začátečník • 26.3. 14:39

odpocet a storno tl.

PavDD • 26.3. 10:22

odpocet a storno tl.

elninoslov • 26.3. 7:50

odpocet a storno tl.

PavDD • 26.3. 7:26

odpocet a storno tl.

elninoslov • 25.3. 22:34

odpocet a storno tl.

Začátečník • 25.3. 15:09