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

• #26045 azopi74 addikt enelna #26044

  Új Válasz 2015-03-17 12:20:13 #26045

  Ú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

  

  azopi74

  addikt

  válasz enelna #26044 üzenetére

  Na jó, feladom, látom nem tudlak meggyőzni, hogy ne így csináld

  Ha mindenképp így akarod, akkor a ThisWorkbook objektumhoz rendeld hozzá az alábbi eljárást:

  Private Sub Workbook_Open()
  
  Application.OnTime TimeValue("07:00:00"), "kuldes"
  
  End Sub

• #26043 azopi74 addikt enelna #26042

  Új Válasz 2015-03-17 09:27:57 #26043

  Ú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

  

  azopi74

  addikt

  válasz enelna #26042 üzenetére

  De nyitvahagyni az adott munkalapot az excelben nem felejted el? Ha se a task scheduler, se szerveroldali megoldása nem jöhet szóba, akkor is inkább egy outlook makrót javasolnék az elküldésre (persze ahhoz is bekapcsolva kell hagyni a gépet). De azt inkább az outlook topicban kérdezd

• #26041 azopi74 addikt enelna #26040

  Új Válasz 2015-03-16 22:16:00 #26041

  Ú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

  

  azopi74

  addikt

  válasz enelna #26040 üzenetére

  Szia,

  Biztos, hogy ezt így akarod megoldani? Csak mert ez azt csinálja, hogy az adott kliensgépen futó excelben épp aktív munkafüzet aktív munkalapját menti el pdf-ként, és küldi el az adott email címekre. Ami hasznos lehet, ha ezt excel makróból csináljuk, de így, ütemezve, nem látom nagyon értelmét.

  Ha LAN-on vagy, akkor ezt a taskot érdemesebb inkébb szerver oldalról beütemezni, és akkor nem szükséges, hogy bekapcsolva legyen a kliens. Ha nincs LAN, akkor is érdemesebb a windows task scheduler-ét használni erre a célra. Ha csak egy adott helyen lévő file email-ben történő kiküldéséről van szó, akkor az teljesen jó megoldás. Ha a pdf-be való konvertálásról van szó, azt persze alapból nem tudja, (bár biztos van rá szerveroldali alkalmazás) de akkor meg nem értem az egészet. Dinamikusan frissül az adott excel tábla adott munkalapja (valami ütemezett lekérdezés van mögötte?), amiért így akarnád megoldani? Persze, ha nagyon akarod, megoldható a dolog excel makróból is, csak nem vagyok benne biztos, hogy tényleg ezt szeretnéd

• #22130 Delila_1 veterán enelna #22129

  Új Válasz 2014-06-25 16:30:40 #22130

  Ú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

  

  Delila_1

  veterán

  válasz enelna #22129 üzenetére

  Szívesen.

• #22126 Delila_1 veterán enelna #22123

  Új Válasz 2014-06-25 15:47:47 #22126

  Ú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

  

  Delila_1

  veterán

  válasz enelna #22123 üzenetére

  Ez meg az óraszámot is beírja a H oszlopba:

  Sub Szabi_Ora()
  Dim sor As Integer, sz As String, hova As Integer
  Dim ora As Integer
  
  hova = Columns(5).Find("Szabadság").Row
  For sor = 10 To 40
  If Cells(sor, "E") = "Szabadság" Then
  sz = sz & Cells(sor, "A") & "; "
  ora = ora + 8
  End If
  Next
  
  Cells(hova, "F") = Left(sz, Len(sz) - 2)
  Cells(hova, "H") = ora
  End Sub

• #22125 Delila_1 veterán enelna #22123

  Új Válasz 2014-06-25 15:44:47 #22125

  Ú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

  

  Delila_1

  veterán

  válasz enelna #22123 üzenetére

  Ez a makró beírja:

  Sub Szabi()
  Dim sor As Integer, sz As String, hova As Integer
  
  hova = Columns(5).Find("Szabadság").Row
  For sor = 10 To 40
  If Cells(sor, "E") = "Szabadság" Then
  sz = sz & Cells(sor, "A") & "; "
  End If
  Next
  
  Cells(hova, "F") = Left(sz, Len(sz) - 2)
  End Sub

• #22121 Delila_1 veterán enelna #22118

  Új Válasz 2014-06-25 15:12:08 #22121

  Ú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

  

  Delila_1

  veterán

  válasz enelna #22118 üzenetére

  Másképp oldanám meg. Az A és B oszlopra feltételes formázást adnék, ahol a képlet

  =$B1="SZ"

  és a háttérszínt pl. pirosra állítanám. Minden sor A és B oszlopában, ahol a B oszlop tartalma SZ, pirosra váltana a háttér.

  A szabadságok darabszámát a

  =DARABTELI(B:B;"SZ")

  képlet adja meg a lapon.

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