Hirdetés

  2. Fórumok
  3. OS, alkalmazások
  4. Microsoft Excel topic
  5. (kiemelt téma)
  • Téma összefoglaló
    Utoljára frissítve: 2023-11-13 08:31

    LOGOUT

    A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
    Kérdés felvetése előtt olvasd el, ha még nem tetted.

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

  • #41753 Fferi50 Topikgazda spe88 #41751
    Új Válasz #41753
    Ú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 spe88 #41751 üzenetére

    Szia!
    A usernek nem kell semmit csinálnia, ha a feltételes formázást előre beállítod azokra a tartományokra, ahol az adatbevitel folyik. Az ismétlődést vörösre állítod. A usert pedig kitanítod, hogy a vörös azt jelenti, ilyen tétel már van.

    Makróban pedig tudod használni a darabtelit, a munkalap change_eseményébe ágyazva.
    Private Sub Worksheet_Change(ByVal Target As Range)
    If Application.Darabteli( Range("A1:A10"),Target.Value)>0 Then
        Msgbox "Már van ilyen érték: " & Target.Value
        'vagy Msgbox helyett:
        Target.Offset(0,1).Value="Ilyen érték már van!'"
        'akár ki is törölheted:        
        Target.Value="" 
    End If
    End Sub
    Természetesen az A1:A10 helyére az adott területet írd.
    Ha az adott cella oszlopában kell nézni, akkor
    Columns(target.column) a Range('A1:A10") helyett. Ebben az esetben nem >0, hanem >1 a kritérium, hiszen az adott cella is benne van az oszlopban.

    Üdv.

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