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

• #20842 bteebi veterán z123456789 #20834

  Új Válasz 2014-03-08 19:16:12 #20842

  Ú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

  

  bteebi

  veterán

  válasz z123456789 #20834 üzenetére

  Ez elvileg azt csinálja, amit szeretnél. Jobb gomb a munkalapra → Kód megjelenítése. Oda másold be ezt:

  Sub osszead()
  Dim szum As Long, i As Long
  szum = 0
  For i = 1 To 200 'Rows.Count
  If Cells(i, 2).Interior.ColorIndex = 6 Then
  szum = szum + Cells(i, 2).Value
  End If
  Next i
  Cells(2, 3).Value = szum
  If Cells(2, 3).Value > 50 Then
  Cells(2, 3).Interior.ColorIndex = 4
  Else
  Cells(2, 3).Interior.Pattern = xlNone
  End If
  End Sub

  A Cells(i, 2)-nél a 2 helyére annak az oszlopnak a számát írd, amiben az összeadást szeretnéd (A=1, B=2, stb.). A Cells(2, 3)-ba teszi az összeget, ami a 3. oszlop, 2. sor cellája (vagyis C2). Az első 200 sorra végzi az összeadást, ezt tetszőlegesen változtathatod. Ha a Rows.Count elől kiveszed az aposztrófot, akkor megcsinálja mind a 65536 sorra, de az már elég lassú .

• #20839 detroitrw addikt z123456789 #20834

  Új Válasz 2014-03-08 12:40:26 #20839

  Ú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

  

  detroitrw

  addikt

  válasz z123456789 #20834 üzenetére

  mivel gondolom a sárga cellák mindig fix-ek így arra fölösleges lenne olyat futtatni ami figyeli a sárga cellákat
  szal manuálisan összegezni kéne s kész

  olyat könnyebben lehet hogy pl. a megjegyzést figyelembe véve adja össze az adott értékeket
  ez lenne a
  C oszlop ahol a megjegyzés van
  B oszlop ahol az összeadandó érték
  =SZUMHA(C:C;"banki feltétel miatt kártyáról fizetve";B:B)

  a feltételes formázást megtalálod az aktuális excel verziódat is beírva a google-be
  ha megvan akkor kiválasztod az aktuális cellát s rányomsz a feltétel formázásra
  itt pl.
  csak az adott tartalmú cellák formázása/cellaérték/nagyobb, mint/itt megadod az értéket

  majd a formátum gombra klikkelve beállítod miként jelezze neked ha egy bizonyos számot túllép a cella

  (#20838) z123456789
  ha nem megy akkor privibe belinkelsz/küldesz egy mintát s megcsinálom

• #20837 alfa20 senior tag z123456789 #20834

  Új Válasz 2014-03-08 11:51:49 #20837

  Ú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

  

  alfa20

  senior tag

  válasz z123456789 #20834 üzenetére

  Feltételes formázás?

• #20835 Bobrooney senior tag z123456789 #20834

  Új Válasz 2014-03-08 11:43:10 #20835

  Ú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

  

  Bobrooney

  senior tag

  válasz z123456789 #20834 üzenetére

  Ha más nem makróval tuti.

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