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

• #5210 ollie MODERÁTOR Ch4os #5201

  Új Válasz 2009-08-06 13:47:10 #5210

  Ú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

  

  ollie

  MODERÁTOR

  válasz Ch4os #5201 üzenetére

  Hmm, ez engem is érdekelne, ha nem gond. Az email címem az adataimnál találod.

• #5209 Delila_1 veterán Ch4os #5208

  Új Válasz 2009-08-06 12:43:54 #5209

  Ú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 Ch4os #5208 üzenetére

  brainstorm = ötletbörze
  A börze tőzsdei kifejezés, már elfogadott szó a köznyelvben.

• #5207 Delila_1 veterán Ch4os #5206

  Új Válasz 2009-08-06 12:33:29 #5207

  Ú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 Ch4os #5206 üzenetére

  Nem szoktam fikázni, kivéve a mostanit.
  Kár, hogy gyengén beszéled magyar, a magyar fórumon benne.

• #5205 Delila_1 veterán Ch4os #5201

  Új Válasz 2009-08-06 12:22:58 #5205

  Ú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 Ch4os #5201 üzenetére

  Küldd el, érdekel.

• #5198 Delila_1 veterán Ch4os #5197

  Új Válasz 2009-08-06 11:54:42 #5198

  Ú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 Ch4os #5197 üzenetére

  Nem az volt a lényeg, hogy az I oszlopban ne legyenek üres sorok, mert akkor a grafikonodban 0 értékek is szerepelnek?

• #5195 Delila_1 veterán Ch4os #5190

  Új Válasz 2009-08-06 11:20:07 #5195

  Ú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 Ch4os #5190 üzenetére

  Jó vicc volt, hogy az előző válaszomhoz elfelejtettem csatolni a makrót.
  A tiédben az ELSE sor beteszi az üres sort az I oszlopba, vagyis ugyanott vagy vele, mint makró nélkül.

  A lenti makrót a lapodhoz kell rendelni: lapfülön jobb klikk, Kód megjelenítése, üres lapra bemásolás.

  Sub Worksheet_Change(ByVal Target As Range)
  If Target.Column = 5 Or Target.Column = 6 Then
  sor_1 = 2
  E = Range("E65536").End(xlUp).Row
  F = Range("F65536").End(xlUp).Row
  usor = Application.WorksheetFunction.Max(E, F)
  
  Range(Cells(2, 9), Cells(usor, 9)).ClearContents 'előző adatok törlése
  
  For fogyi = 2 To usor
  If Cells(fogyi, 5) > 0 And Cells(fogyi, 6) > 0 Then
  Cells(sor_1, 9) = Round(Cells(fogyi, 6) / (Cells(fogyi, 5) / 100), 2)
  sor_1 = sor_1 + 1
  End If
  Next fogyi
  End If
  End Sub

  Gyorsan elküldöm, mert ezelőtt 4 db pillanatnyi áramszünet megsemmisítette a válaszomat.

• #5189 Delila_1 veterán Ch4os #5188

  Új Válasz 2009-08-05 06:34:55 #5189

  Ú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 Ch4os #5188 üzenetére

  Egy kis makrót lefuttatva a H oszlopban megkapod egymás alatt azokat az értékeket, amiket majd a grafikonban megjeleníthetsz.
  A makró a lapod 2. sorától indul, feltételezve, hogy ott kezdődnek az adataid (1. sor a cím). Figyeli az E és F oszlopok tartalmát, és ha mindkét érték nagyobb, mint 0, elvégzi az osztást, az eredményt beírja a H oszlop következő üres sorába (a másodiktól kezdve).
  Ha a számokat tartalmazó sorok (E és F oszlopban) nem a 2. sorban kezdődnek, a makróban a sor_1=2 -nél a 2 helyett írd azt be, a For sor =2 To kezdetűnél szintén a 2 helyett.

  Az adataidhoz valószínűleg van címoszlop is. A H oszlop kevesebb adatot tartalmaz, mint az E vagy F oszlop, mert az üres sorok ki vannak gyomlálva. A címoszlopot is ennek megfelelően kell alakítani. Mivel nem tudom, melyik oszlopod tartalmazza a sorok címét, a D oszlopra gondoltam. Ennek a megfelelő értékeit írattam a G oszlopba.
  A makróban a Cells(sor_1, 7) = Cells(sor, 4) -nél a 4 helyett írd be az eredeti oszlopod sorszámát. ("A" oszlop esetén ez 1, "B" oszlopnál 2, stb.).

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