< návrat zpět

MS Excel


Téma: VBA - otevření souboru rss

Zaslal/a 16.7.2020 18:01

FantasykZdravím,
mám napsané makro:
Dim w As Workbook
Set w = Workbooks.Open(Filename:="\\10.71.68.30\_common\_PRODUCTION\FRICTION\LISY\Zpian\dlouhý.xls")
Range("A1:AC2000").Select
Selection.Copy
w.Close SaveChanges:=True
Set w = Nothing
Sheets("Zpian").Select
Range("A1:AC2000").Select
ActiveSheet.Paste


Ale, když se to připojí a otevře soubor, tak ten soubor je zaheslovaný a chtěl bych, aby to kliklo jen na tlačítko ( Jen pro čtení )
ale nevím jak to udělat..

Dekuji moc

Jméno
Kontrola
Text
  b i u s img code url hr   1 2 3 4 5 6 7 8 9 10

#047347
elninoslov
Parameter procedúry Open ?
ReadOnly:=Truecitovat
#047353
Fantasyk

elninoslov napsal/a:

Parameter procedúry Open ?
ReadOnly:=True


Když jsem to napsal takhle:
Set w = Workbooks.Open(Filename:="\\10.71.68.30\_common\_PRODUCTION\FRICTION\LISY\Zpian\dlouhý.xls").ReadOnly = True

Tak mi to píše chybu :
Compile ERROR

a makro ani nejede
Type Mismatchcitovat
#047354
avatar
Set w = Workbooks.Open(Filename:="\\10.71.68.30\_common\_PRODUCTION\FRICTION\LISY\Zpian\dlouhý.xls", ReadOnly:=True)citovat
#047355
Fantasyk

Jiří497 napsal/a:

Set w = Workbooks.Open(Filename:="\\10.71.68.30\_common\_PRODUCTION\FRICTION\LISY\Zpian\dlouhý.xls", ReadOnly:=True)


děkuji moc = člověk se stále učí ..

Děkuji moccitovat

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