• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

MS Excel

Téma: VBA - otevření souboru

Zaslal/a Fantasyk 16.7.2020 18:01

Zdraví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

Zaslat odpověď >

---

elninoslov(16.7.2020 19:12)#047347

Parameter procedúry Open ?
ReadOnly:=Truecitovat

Fantasyk(17.7.2020 14:36)#047353

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

Jiří497(17.7.2020 14:45)#047354

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

Fantasyk(17.7.2020 15:22)#047355

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)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse