Új hozzászólás Aktív témák

• #44543 Fferi50 Topikgazda eszgé100 #44542

  Új Válasz 2020-07-28 08:52:13 #44543

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Fferi50

  Topikgazda

  válasz eszgé100 #44542 üzenetére

  Szia!
  Azért lenne pár kérdésem ez alapján.
  Először a makrókhoz:
  Dokumentumokról beszélsz, ezek Excel vagy Word fájlok?
  Sub Open_Word_Document()
Set objWord = CreateObject("Word.Application")
objWord.Documents.Open "Z:\Excel\ALBÉRLET.docm"
objWord.Visible = False
objWord.Application.Run "NewMacros.toprint"
CreateObject("Excel.Application").Wait (Now + TimeValue("00:00:01"))
objWord.Quit SaveChanges:=objWordsDoNotSaveChanges
Set objWord = Nothing
End Sub
  Itt megnyitsz egy Word alkalmazást és abban egy dokumentumot, majd lefuttatsz egy makrót, ami a Word alkalmazásban (NewMacros) van, ami kinyomtatja azt. Ezután létrehozol egy Excel alkalmazást és bezárod a Word-ot.
  Ha Excelből indítod a makrót, akkor miért kell új Excel alkalmazás létrehozni? Ha Wordben van a makró, akkor miért kell új Word alkalmazást létrehozni, majd bezárni?
  Nem tudom hány xls-ed van, de nem hiszem, hogy mindegyiket külön-külön el kellene látni ugyanazon funkciókat végző makrókkal. Én egy alap Excelt használnék, amiben a makrók benne vannak és abból intézném az összes többinek a megnyitását és kezelését. Így csak egy fájlt kell karbantartani, nem pedig x db-ot.
  De lehet, hogy rosszul látom.
  Üdv.

Új hozzászólás Aktív témák