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

• #18573 Mutt senior tag Hequila #18565

  Új Válasz 2013-07-22 12:53:06 #18573

  Ú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 Hequila #18565 üzenetére

  Hello,

  ...ha egy adott oszlop adott mezőjének értéke 0, akkor automatikusan törlődjön az az oszlop...

  Itt egy változat erre. Mintában az "A2"-es cellát figyelem.

  Private Sub Worksheet_Change(ByVal Target As Range)
  Dim vHely As Range
  Dim vPosition As String
  
  Set vHely = Range("A2") 'ezt a helyet figyeljük, ezt javítsd
  
  If Range(vHely.Address) <> "" And Range(vHely.Address) = 0 Then 'ha nem üres, de 0 akkor mehet a tőrlés
  Application.ScreenUpdating = False 'képernyő frissítés kikapcsol
  vPosition = Target.Address 'elmentjük a korábbi pozicíónkat
  Columns(vHely.Column).Delete 'töröljük a figyelt cella oszlopát
  Range(vPosition).Activate 'visszamegyünk az eredeti helyre
  Application.ScreenUpdating = True 'képernyő visszaállítása
  End If
  
  End Sub

  üdv.

• #8204 Pulsar veterán Hequila #8201

  Új Válasz 2010-09-20 23:44:32 #8204

  Ú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

  

  Pulsar

  veterán

  válasz Hequila #8201 üzenetére

  B-ben 1-esek vannak

  =SUMIF(B16;"1";A1:A6) angol excel
  =SZUMHA(B16;"1";A1:A6) magyar excel

  B-ben 2-esek vannak

  =SUMIF(B16;"2";A1:A6) angol excel
  =SZUMHA(B16;"2";A1:A6) magyar excel

• #8203 perfag aktív tag Hequila #8202

  Új Válasz 2010-09-20 23:44:02 #8203

  Ú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

  

  perfag

  aktív tag

  válasz Hequila #8202 üzenetére

  Olvass vissza: (#4807) gyga kérdése szerintem nagyon hasonló, Fehér Mancs a(#4854)-ban Szorzatösszeg-et javasol a megoldásra. Én nem is ismertem ezt a függvényt korábban, és ehelyett még mindig tömbképletet használok
  pl. ebben az esetben: ={SZUM((A1:A4)*(B1:B4=2))}

• #8202 Hequila őstag Hequila #8201

  Új Válasz 2010-09-20 22:11:16 #8202

  Ú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

  

  Hequila

  őstag

  válasz Hequila #8201 üzenetére

  Vagy ha van rá mód, hogy szelektáltan tudjam A oszlop elemeit összeadni (és ne egyenként), azt is szívesen veszem!

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