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

• #42588 Delila_1 veterán kymco #42587

  Új Válasz 2019-12-23 14:10:56 #42588

  Ú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 kymco #42587 üzenetére

  Szívesen.

• #42586 Delila_1 veterán kymco #42585

  Új Válasz 2019-12-23 07:39:57 #42586

  Ú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 kymco #42585 üzenetére

  A Solver bővítménnyel megoldható. A C oszlopot feltöltöd nullával, vagy 1-gyel, majd indítod a Solvert a kép szerint.

  

• #42391 lappy őstag kymco #42390

  Új Válasz 2019-12-05 14:22:58 #42391

  Ú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

  

  lappy

  őstag

  válasz kymco #42390 üzenetére

  A neveket egy táblázatba foglalod adsz neki egy nevet.. Majd a legördülő listanál csak ezt a nevet kell megadni az egyenlőségjel után. Ezután a mellette lévő céllánál egy fkeres függvény segítségével megkeresed a hozzá illő dátumot.

• #42276 Fferi50 Topikgazda kymco #42275

  Új Válasz 2019-11-25 08:06:30 #42276

  Ú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 kymco #42275 üzenetére

  Szia!
  A globális (publikus) változókra úgy kell hivatkozni, hogy a teljes nevüket használod: Modulnév.változónév.
  Esetedben Thisworkbook.Ts01

  Üdv.

• #42260 Delila_1 veterán kymco #42259

  Új Válasz 2019-11-23 18:40:44 #42260

  Ú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 kymco #42259 üzenetére

  Krizsák László műve ez a fájl, amit feltöltök.
  [link]
  Jó régen közölte egy másik fórumon, ezért gondolom, nem baj, ha itt is közkinccsé teszem.
  Még 2003-as, vagy azelőtti verzióban készült, ami látszik az xls kiterjesztésből.

• #37468 Fferi50 Topikgazda kymco #37467

  Új Válasz 2018-03-07 07:19:06 #37468

  Ú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 kymco #37467 üzenetére

  Szia!

  Modulba kell tenned a függvényt, nem pedig egy munkalap kódlapjára. (VBA menü - Insert - Module)

  Ekkor minden munkalap látja.

  Üdv.

• #24954 KaliJoe tag kymco #24946

  Új Válasz 2015-01-09 17:20:59 #24954

  Ú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

  

  KaliJoe

  tag

  válasz kymco #24946 üzenetére

  Szia kymco,

  Ha a verbális erőszakot nem akarod, akkor próbálkozhatsz a fizikaival is. Lehet gyorsabb megoldás!

  Képletben:

  ...
  For Each str_Dolgozó as wsh_DolgozókNeve
  If "verbális erőszak"<>"Eredmény" then
  Do
  Üt=Üt+1
  Loop "verbális erőszak"<> "Eredmény"
  End if
  Next str_Dolgozó
  ...

  

• #24948 Fferi50 Topikgazda kymco #24946

  Új Válasz 2015-01-09 12:59:49 #24948

  Ú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 kymco #24946 üzenetére

  Szia!

  Ezt nevezik szívásnak....
  Ha hálózaton dolgoztok, akkor megoldás lehet, hogy felteszed egy központi helyre a fájlt, ott megadod az excelnek a szükséges beállításokat. Ezek után pedig csak az itteni excelt elindítva lehessen használni.

  Mivel nem indulhat el a makró, így nem tudod kikényszeríteni sem a bezárást, sem a makró indulást.
  Még egy olyan ötletem van, hogy egy adott cellába beírsz egy képletet, ami egy másik cella állapotát figyeli és attól függően feltételes formázással figyelmezteted a felhasználót, hogy ez így nem lesz jó.

  Pld.
  A1 cella képlete =ha(A2<>1;"Nincsenek bekapcsolva a makrók, hibás adatokat fogsz elmenteni, kérlek, lépj ki mentés nélkül!";"Minden OK")
  A1 cella feltételes formázása képlettel, =$A$2=0, kitöltés vörös
  A2 cellába pedig a Workbook_Open eseményben legelső dolgod, hogy beleírod az 1-et, a Workbook_BeforeClose eseményben pedig átírod 0 értékre.

  Persze ez nyilván nem garantálja, hogy bárki is ennek megfelelően cselekszik. Arra egyelőre nincs tippem, hogyan nézhető meg, hogy valaki "makróhasználat nélkül" írta felül a fájlt.

  Üdv.

• #15965 Delila_1 veterán kymco #15964

  Új Válasz 2013-01-03 12:33:29 #15965

  Ú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 kymco #15964 üzenetére

  Szívesen.

• #15963 Delila_1 veterán kymco #15962

  Új Válasz 2013-01-03 12:29:02 #15963

  Ú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 kymco #15962 üzenetére

  A makró elején az

  ActiveSheet.Protect Password:="szupertitkosjelszó", UserInterfaceOnly:=True

  lehetővé teszi a makró számára a védett cellák módosítását.

• #15876 Mutt senior tag kymco #15875

  Új Válasz 2012-12-21 17:02:36 #15876

  Ú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

  

  Mutt

  senior tag

  válasz kymco #15875 üzenetére

  Szia,

  Ezt függvénnyel nem tudod megoldani, makró kell hozzá.

  A makrót a munkalap Change eseményére kell tenned, mivel ez fut le cella módosításkor.

  Itt egy egyszerű példa:
  Private Sub Worksheet_Change(ByVal Target As Range)
  
  If Target.Row > 1 And Target.Column = 2 Then
  Range(Target.Address).Offset(, 3) = Now()
  End If
  
  End Sub

  Ahol
  - a Target.Row > 1 azt jelenti, hogy az első sort figyelmen kívül hagyjuk (általában itt van a fejléc)
  - a Target.Column = 2 megmondja, hogy csak a második oszlopot figyeljük (ez nálad biztosan más)
  - a Range(Target.Address).Offset(, 3) -al adjuk meg, hogy az éppen módosított cellától jobbra 3-al lesz majd ahova az időbélyeget (a most függvény aktuális értékét, nem a függvényt!) tesszük.

  üdv.

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