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

• #48441 csferke senior tag

  Új Válasz 2022-02-07 11:17:37 #48441

  Ú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

  

  csferke

  senior tag

  Sziasztok!
  Időközben rájöttem, hogy a kérdésemre kapott eredmény nem felelne meg az elvárásomnak.
  Átmozgattam a D oszlopot E-be
  Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, [E:E]) Is Nothing Then
        Sheets("Bilans").[A8] = Target + 5
    End If
End Sub


  Ha E oszlop adott sorába beíródik egy új adat akkor
  - ha a B oszlop azonos sorában lévő szöveg E-vel kezdődik akkor Target + 5
  - ha a B oszlop azonos sorában lévő szöveg N-el kezdődik akkor Target + 9
  - ha a B oszlop azonos sorában lévő szöveg bármi mással kezdődik akkor Target + 0

  köszi
  Angol Excel 2007

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