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

• #20110 kekec@ csendes tag kekec@ #20109

  Új Válasz 2014-01-17 08:48:43 #20110

  Ú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

  

  kekec@

  csendes tag

  válasz kekec@ #20109 üzenetére

  Még annyi esetleg ha a makró menti a táblázatot más helyre akkor viszi magával a makrót is.
  Meg lehet oldani hogy, ne vigye csak egy sima xls legyen a végeredmény?

• #20109 kekec@ csendes tag zhari #20065

  Új Válasz 2014-01-17 08:18:15 #20109

  Ú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

  

  kekec@

  csendes tag

  válasz zhari #20065 üzenetére

  Szia!

  Hú ha ez kicsit már bonyolult nekem...
  Na eddig eljutottam:

  Sub Makró11()

  '
  ' Makró11 Makró
  '

  '
  ChDir "C:\Documents\Hibabejelentő\Jelentések"
  ment = utvonal & fajlnev & "Valami " & Format(Now, "yyyy.mm.dd") & ".xls"
  ActiveWorkbook.SaveAs ment
  '
  ' mail Makró
  '

  '
  Range("B11").Select
  Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True

  End Sub

  Most már az is jó hogy, máshova menti (az eredetit békén hagyva ) Dátummal és megfelelő névvel nevezve.

  Outlook indul ha ráklikkelek a mailcímre. Na innen kezdődnek a gondjaim.
  Csatolnia kellene a helyes-kitöltött xls-t, tárgymező kitöltésével egy makrónak.
  Hogyan lehetne egyszerűen megoldani?

• #20094 kekec@ csendes tag

  Új Válasz 2014-01-15 13:06:54 #20094

  Ú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

  

  kekec@

  csendes tag

  Na valameddig eljutottam de belefutottam másba. Azt szeretném hogy ha elmenti a makró a táblázatot ajánlja fel hogy más néven vagy az aktuális dátummal tegye meg. A dátum jobb lenne...
  Ezt kreáltam de mindig felülírja a régit. Mivel tudnám megoldani?

  Sub Makró2()
  '
  ' Makró2 Makró
  '

  '
  Range("B2").Select
  ActiveCell.FormulaR1C1 = "1111"
  Range("C2").Select
  ActiveWorkbook.SaveAs Filename:= _
  "C:valami.xlsm", FileFormat
  :=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
  Range("A1").Select
  Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True
  End Sub

• #20064 kekec@ csendes tag zhari #20063

  Új Válasz 2014-01-13 10:32:22 #20064

  Ú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

  

  kekec@

  csendes tag

  válasz zhari #20063 üzenetére

  Konkrétan ezt szeretném elérni:
  

  Hogy ha a mailcímre kattintok akkor automatikus csatolja azt az excel táblázatot.
  (Most külön csatoltam a példa miatt)

• #20061 kekec@ csendes tag

  Új Válasz 2014-01-13 09:41:57 #20061

  Ú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

  

  kekec@

  csendes tag

  Sziasztok!

  Van egy táblázatom amiben szerepel emailcím is.
  A következőt szeretném elérni:
  Van egy táblázatom (picinyke) amiben dolgozok, ebben szerepelnek emailcímek
  Ha rákattintok a emailcímre elindul az outlook kitöltve a címzetteket. Eddig oké,de szeretném ha azt a táblázatot is csatolná automatikusan amiben, amiből megkapta a címet.
  Lehet egy picit konyultan fogalmaztam bocsánat.
  Van rá valami megoldás?

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