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

• #15936 pmonitor aktív tag Cicero #15932

  Új Válasz 2021-05-19 19:33:01 #15936

  Ú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

  

  pmonitor

  aktív tag

  válasz Cicero #15932 üzenetére

  Neked a legjobb a VBA. Word és Access objektumaihoz nem értek. Excelben a következőképpen tudsz 1 már meglevő munkafüzetből új munkafüzetet megnyitni:
  1.: ALT+F11 -> ekkor megjelenik a VBA editor.
  2.: Insert menü -> Module menüpontra klikk. Ekkor megjelenik a Module1. Dupla katt rá
  3.: A megnyíló ablakba beilleszted a következő kódot:

  Sub a()
Dim excapp As Object
Set excapp = CreateObject("Excel.Application")
excapp.Visible = True
Dim wrkb As Object
Set wrkb = excapp.Workbooks.Add()
wrkb.Worksheets(1).Range("A1") = "abcd"
End Sub

Sub b()
Dim excapp As Object
Set excapp = CreateObject("Excel.Application")
excapp.Visible = True
excapp.Workbooks.Add
excapp.Workbooks(1).Worksheets(1).Range("A1") = "abcd"
End Sub

  4.: valamelyik eljárás törzsébe belekattintasz, hogy a kurzor benne legyen.
  5.: F5-öt nyomsz Ekkor lefut az az eljárás, amiben a kurzor van.

  Egyébként a példámban az a() és a b() eljárásom ugyanazt csinálja: Megnyit egy új munkafüzetet, és annak a munkalapjának az első cellájába beleírja az "abcd" szöveget.

  Először gyakorold az Excel és a Word objektumaival való munkát, csak utána kezdj nekiállni ennek a feladatnak.

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