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

• #26776 Delila_1 veterán bakabaka #26775

  Új Válasz 2015-05-02 12:38:44 #26776

  Ú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 bakabaka #26775 üzenetére

  Helyes!

• #26774 Delila_1 veterán bakabaka #26773

  Új Válasz 2015-05-02 12:33:30 #26774

  Ú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 bakabaka #26773 üzenetére

  Próbánál érdemes lépésenként futtatni a makrót, vagy annak az új részét.
  A Stop utasítás helyett a képen jelölt sávra kattintva lestoppolod a sort, innen lépésenként haladhatsz tovább.
  Ne magát a makrót nézd!

  

• #26772 Delila_1 veterán bakabaka #26771

  Új Válasz 2015-05-02 12:22:49 #26772

  Ú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 bakabaka #26771 üzenetére

  Azt leírta Fferi az előző hsz-ben.

• #26770 Fferi50 Topikgazda bakabaka #26768

  Új Válasz 2015-05-02 12:10:28 #26770

  Ú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 bakabaka #26768 üzenetére

  Szia!

  A ciklusodon belül egy DoEvents utasítást helyezz el, ekkor a billentyűzet lenyomásokat egy idő után érzékeli az op rendszer és megáll a program futása (Debug párbeszédablak jelenik meg).

  Esetleg egy változóban számolhatod a "kísérleteket" (lefutott ciklus számát) és adott érték után kilépsz a ciklusból, vagy megállítod a programot.

  A ciklusba az adat bevitele után az ellenőrzés megkezdése előtt beviszel egy stop utasítást. Innen pedig lépésenként futtatod a programot tovább.

  Üdv.

• #26769 Delila_1 veterán bakabaka #26768

  Új Válasz 2015-05-02 12:04:56 #26769

  Ú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 bakabaka #26768 üzenetére

  Az inputboxnál eleve add meg, milyen típusú értéket vársz.

  Type:=0 képlet
  Type:=1 szám
  Type:=2 szöveg
  Type:=4 logikai, true vagy false
  Type:=8 cellahivatkozás (range)
  Type:=16 hibaérték, mint #ÉRTÉK
  Type:=64 tömb érték (array)

  Pl. 100 és 500 közötti szám bekérése

  valasz=Application.InputBox("Adj egy 100 és 500 közötti számot", "Szám bekérése", , , , , , 1)
  If valasz <100 Or valasz>500 Then Exit Sub

  Vagy
  Set ter=Application.InputBox(prompt:="Kérem a tartományt",Type:=8)

• #26631 Delila_1 veterán bakabaka #26629

  Új Válasz 2015-04-21 06:38:27 #26631

  Ú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 bakabaka #26629 üzenetére

  Szívesen. A 26626-os válaszodból úgy látom, hogy alfa20 válaszát is jól értetted.

• #26627 Delila_1 veterán bakabaka #26626

  Új Válasz 2015-04-20 07:10:10 #26627

  Ú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 bakabaka #26626 üzenetére

  B3-ra hivatkozunk a D4 cellán állva.

  R1C1 hivatkozásnál ki kell írni az értékadás bal oldalára az R1C1-et.

  Range("D4").FormulaR1C1 = "=R[-1]C[-2]" '– relatív hivatkozás
  Range("D4").FormulaR1C1 = "=R3C[-2]" '– vegyes hivatkozás, fix sor
  Range("D4").FormulaR1C1 = "=R[-1]C2" '– vegyes hivatkozás, fix oszlop
  Range("D4").FormulaR1C1 = "=R3C2" '– fix hivatkozás

  Nem R1C1 tip. hivatkozásnál elhagyható a Formula, de ki is írhatod.

  Range("D4") = "=B3" '– relatív hivatkozás
  Range("D4") = "=B$3" '– vegyes hivatkozás, fix sor
  Range("D4") = "=$B3" '– vegyes hivatkozás, fix oszlop
  Range("D4") = "=$B$3" '– fix hivatkozás

  Egy tartományba 1 lépésben is beírhatod a képleteket. Pl. a D4:D10-ben akarod 2-vel szorozni a B oszlop 1 sorral fentebbi értékét:

  Range("D4:D10").FormulaR1C1 = "=R[-1]C2" '– vegyes hivatkozás, fix oszlop
  Range("D4:D10") = "=$B3*2" '– vegyes hivatkozás, fix oszlop
  Range("D4:D10") = "=B3*2" '– relatív hivatkozás

  Összegzés: R1C1 formátumnál a szögletes zárójelek között megadott érték relatív, enélkül fix hivatkozás, nem R1C1 formátumnál a $ jel rögzít.

• #26625 alfa20 senior tag bakabaka #26624

  Új Válasz 2015-04-19 23:26:32 #26625

  Ú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 bakabaka #26624 üzenetére

  Szia!

  Először is szedjük ketté a 'R3C2'-őt.
  Az első része: 'R3' = Row 3, azaz Sor 3 (magyarul: 3. sor)
  A második része: 'C2' = Column 2, azaz Oszlop 2 (magyarul: 2. oszlop)
  Ez a két érték adja meg a cella helyzetét, akár két koordináta érték hosszúság/szélesség csak itt sor/oszlop.
  Ez a cellában a '$B$3' értéknek felel meg,

  Ha viszont kijelölsz egy cellát és hozzá/tőle akarsz viszonyítani, akkor az 'R' és/vagy 'C' mögé '[ ]' jelet kell tenni amiben meg tudod adni, hogy mennyi cellával odébb akarsz hivatkozni.:
  tehát ha ki van jelölve a B3 cella és azt adod meg makróban, hogy: R[-1] akkor az a B3 cellától egyel feljebb levőre mutat B2, míg a R[2] a kettő sorral lentebb levőre B5.
  Az oszlopnál ugyan ez a helyzet csak itt a mínusz érték C[-1] felfelé, a plusz értél C[1] lefelé.

  Remélem tudtam segíteni!

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