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

• #45547 Pakliman tag Lokids #45540

  Új Válasz 2020-12-10 09:49:01 #45547

  Ú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

  

  Pakliman

  tag

  válasz Lokids #45540 üzenetére

  Szia!

  Private Sub Kód_írása_programból()
Dim c As Long

'Új munkafüzet létrehozása
Workbooks.Add

c = Application.VBE.ActiveVBProject.VBComponents("ThisWorkbook").CodeModule.CountOfLines

'Az új munkafüzetbe beírunk egy kódot!!!
With Application.VBE.ActiveVBProject.VBComponents("ThisWorkbook").CodeModule
.InsertLines c + 1, "'Ezeket a sorokat programból hoztuk létre!!"
.InsertLines c + 2, "Private Sub Workbook_BeforeClose(Cancel As Boolean)"
.InsertLines c + 4, "End Sub"
End With

End Sub

  Itt egy részletes és "teljesen érthető" leírás.
  Én is ebből (is) tanulgattam.

• #45541 Fferi50 Topikgazda Lokids #45540

  Új Válasz 2020-12-09 16:56:57 #45541

  Ú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 Lokids #45540 üzenetére

  Szia!
  "Viszont ennek a ws change makrónak a létrehozott WB-n kell futnia."
  Úgy érted, hogy amikor bezárják és újra megnyitják, akkor a "saját" makrója fusson?
  "makróval hogyan tudok makrót illeszteni egy létrehozott WB-be"
  Elvileg lehet a VB projektben makróval makrókat módosítani, újakat beleírni, törölni stb. DE nem javasolt - bármelyik vírusírtó veszélyesnek ítélheti és kigyomlálhatja - és nem is egyszerű.
  Megoldható például úgy, hogy mented az alap munkafüzetet más néven, kitörlöd belőle azokat a munkalapokat, amelyek nem kellenek bele, hozzáadod az újakat, formázod stb.
  A mentéssel mentődnek a makrók is - természetesen makróbarát vagy bináris munkafüzetként kell menteni. Mindezt megteheted az alap munkafüzet makróiból.
  Ráadásul mivel más néven mented, az eredeti mindig megmarad és újra felhasználható.
  Aztán lehet sablont is létrehozni, amiben benne vannak a makrók és az új munkafüzetet a sablonból megnyitni.
  Üdv.
  Mentsd

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