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

• #1217 martonx veterán Naras #1215

  Új Válasz 2010-07-06 13:11:17 #1217

  Ú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

  

  martonx

  veterán

  válasz Naras #1215 üzenetére

  A fenti példa amúgy sem működik Office 2007-tel, úgyhogy nyugodtan felejtsd el, vagy inkább javítsd ki úgy, hogy az működjön.

  Pont pár hete tapasztaltam, hogy a nagyvállalati környezetünkben, az egy szál felhasználó gépén, akinek Office 2007-je van, nem fut a fasza kis vágólapos makróm.

  shev7 segítségébe ezért is nem akartam beleokoskodni, mivel a megoldása tökéletes, csak sajnos mára egyre ritkábban használható.

  Mivel mint mondtam nálunk csak 1 gépen van NEM Office 2003, ezért nem is foglalkoztam a problémával.

  Mondjuk a probléma biztosan bagatell, és te is rá tudsz jönni, hogy Office 2007-ben mit kell változtatni a kapott példához képest.

  shev7 érthetően leírta, hogy hol kell hozzáadnod a plusz referenciát, ez Office 2007-ben is pont ugyanott található, mint az összes eddigi, sőt az Office 2010-es verzióban is.

  Ha nagyon nem tudsz rájönni, itthon Office 2010-em van, ránézhetek a problémára (hacsak majd ki nem derül, hogy a 64 bites Office 2010-es megoldásom nem lesz jó a 32 bites Office 2007-edbe...)

• #1216 shev7 veterán Naras #1215

  Új Válasz 2010-07-06 12:10:00 #1216

  Ú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

  

  shev7

  veterán

  válasz Naras #1215 üzenetére

  office 2007-em nincs a meloban. De ugye a referenciat nem az excelben kell hozzaadni, hanem a VBA editorban, az meg emlekeim szerint 2007 alatt is a "klasszikus menu"-t hasznalja...

  mit ertesz az alatt, hogy onmagaban mukodokepes? mi nem mukodokepes azon, hogy egy valtozoban (amivel ugye azt csinalsz utana amit akarsz) bekerul a vagolap tartalma? azert ezt adoptalni a sajat kododba mar nem kene hogy problemat jelentsen...

  Dim DataObj As New MSForms.DataObject
  DataObj.GetFromClipboard
  ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:= DataObj.GetText, TextToDisplay:= "Link"

• #1214 shev7 veterán Naras #1213

  Új Válasz 2010-07-05 14:58:55 #1214

  Ú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

  

  shev7

  veterán

  válasz Naras #1213 üzenetére

  a referenciaknal (tools/references) hozza kell adnod: Microsoft Forms 2.0 Object Library'

  Ha nincs a listaban akkor tallozd be ezt: FM20.dll

  Dim DataObj As New MSForms.DataObject
  Dim S As String
  DataObj.GetFromClipboard
  S = DataObj.GetText

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