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

• #48406 Attas aktív tag Jonie #48400

  Új Válasz 2022-02-01 17:10:59 #48406

  Ú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

  

  Attas

  aktív tag

  válasz Jonie #48400 üzenetére

  Tökéletes! Hálás köszönet érte!!

• #48403 lappy őstag Jonie #48401

  Új Válasz 2022-02-01 15:34:39 #48403

  Ú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 Jonie #48401 üzenetére

  https://www.passware.com/kit-forensic/

• #48402 Fferi50 Topikgazda Jonie #48400

  Új Válasz 2022-02-01 15:33:03 #48402

  Ú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 Jonie #48400 üzenetére

  Szia!
  Elvileg az Excel automatikus mentése ha be van kapcsolva, akkor az automatikus helyreállítási mappában érdemes keresgélni. (Megtalálod a beállítások - mentés fülön.)
  Tanulság: megosztás előtt csinálni kell egy mentést elszeparálva a közös fájltól - másik néven, másik helyen. A megosztás megszüntetése előtt ugyanígy a közös fájllal.
  Ha újra kellene játszani a történetet.

  Üdv.

• #48398 lappy őstag Jonie #48396

  Új Válasz 2022-02-01 15:20:11 #48398

  Ú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 Jonie #48396 üzenetére

  vannak rá programok amikkel visszanyerhetők, leszedhetők a jelszók

• #48397 Fferi50 Topikgazda Jonie #48396

  Új Válasz 2022-02-01 15:19:40 #48397

  Ú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 Jonie #48396 üzenetére

  Szia!
  Adtál neki a megosztásnál új jelszót? Ha nem adtál, csak megosztottad, akkor elvileg nem kell a megnyitáshoz jelszó.
  Egyébként meg szerintem elő kell szedni az előző verziót, ami még nem volt "közösítve". Gondolom, azért mentést rendszeresen csináltok róla.
  Üdv.

• #48105 Delila_1 veterán Jonie #48104

  Új Válasz 2021-12-24 10:10:39 #48105

  Ú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 Jonie #48104 üzenetére

  Örülök, hogy elnyerte a tetszésedet.
  Neked is minden jót az ünnepekre!

• #48103 Delila_1 veterán Jonie #48102

  Új Válasz 2021-12-24 09:01:42 #48103

  Ú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 Jonie #48102 üzenetére

  Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 1 Then
        Application.EnableEvents = False
        If Application.WorksheetFunction.CountA(Range(Target.Address)) = Target.Count Then
            Range(Target.Address).Offset(, 1) = Date
        Else
            Range(Target.Address).Offset(, 1) = ""
        End If
        Application.EnableEvents = True
    End If
End Sub

  Ha nem az első oszlopba írsz adatot, akkor az If Target.Column = 1 Then sorban kell az 1-et átírnod az oszlop számára. Ha pedig a dátumot nem a következő oszlopba íratnád, akkor a Range(Target.Address).Offset(, 1) = "" sorban kell az 1-et annyira átírni, ahány oszloppal jobbra szeretnéd megkapni.

• #48089 Delila_1 veterán Jonie #48088

  Új Válasz 2021-12-22 20:02:59 #48089

  Ú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 Jonie #48088 üzenetére

  Rendeld a lapodhoz a makrót, lásd az Összefoglalóban ennek a leírását.
  Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 1 And Target > "" Then Cells(Target.Row, 2) = Date
    If Target.Column = 1 And Target = "" Then Cells(Target.Row, 2) = ""
End Sub

• #48087 lappy őstag Jonie #48086

  Új Válasz 2021-12-22 18:58:28 #48087

  Ú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 Jonie #48086 üzenetére

  Képlettel nem lehet viszont macroval igen

• #48085 Delila_1 veterán Jonie #48084

  Új Válasz 2021-12-22 07:34:46 #48085

  Ú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 Jonie #48084 üzenetére

  =HA(A1<>"";MA();"")

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