< návrat zpět

MS Excel


Téma: chyba - error 1004 rss

Zaslal/a 22.1.2016 7:05

zdravím,
program mi háže chybu: Nelze získat vlastnost OLEObject třídy worksheets a nevím co stím:

kod kopíruje obrázky z tabulky, přejmenovává je a určuje jim pozici:
For i = 4 To 44
If Sheets("Sekce").Cells(i, 24).Value <> "" Then
nazevImg = Sheets("sekce").Cells(i, 25).Value
Sheets("Sekce").OLEObjects(nazevImg).Copy
Sheets("Skladba jednotky").Paste
Sheets("Skladba jednotky").OLEObjects("image1").Name = Sheets("Sekce").Cells(i, 28).Value
nazevObr = Sheets("Sekce").Cells(i, 28).Value
Sheets("Skladba jednotky").OLEObjects(nazevObr).Top = Sheets("sekce").Cells(i, 26).Value
Sheets("Skladba jednotky").OLEObjects(nazevObr).Left = Sheets("sekce").Cells(i, 27).Value
End If
Next i

v tabulce chyba není.
poradí mi někdo co stím?
Díky.

Zaslat odpověď >

Strana:  « předchozí  1 2
#029541
avatar
hromadně to právě kopírovat nemůžu, ale předchozí kód mi dostatečně vyhovuje! ještě jednou velké díky jste fakt borec. 1citovat

Strana:  « předchozí  1 2

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

Vynásobit hodnoty kurzem - Power Query

Alfan • 26.4. 7:56

Relativní cesta - zdroje Power Query

Alfan • 26.4. 7:54

Vynásobit hodnoty kurzem - Power Query

elninoslov • 26.4. 7:54

Vynásobit hodnoty kurzem - Power Query

lubo • 25.4. 19:18

Relativní cesta - zdroje Power Query

elninoslov • 25.4. 15:12

Relativní cesta - zdroje Power Query

Alfan • 25.4. 15:08

Relativní cesta - zdroje Power Query

elninoslov • 25.4. 14:21