Excel makró segítség

Ez a téma lezárásra került a moderátor által. A lezárás oka: Témacím… témacím… témacím…
Excel makró segítség
2018-12-02T00:32:11+01:00
2018-12-02T14:35:14+01:00
2022-10-15T21:36:20+02:00
tomili96
Íme a gondom: 

ActiveCell.Offset(0, 1).Range("A1").Select
ActiveCell.FormulaR1C1 = "=+R[-1]C/R[-1]C[-1]-1"
ActiveCell.Offset(1, 0).Range("A1").Select
ActiveCell.FormulaR1C1 = "=+R[-2]C/R8C3-1"
ActiveCell.Offset(-1, 0).Range("A1:A2").Select
Selection.AutoFill Destination:=ActiveCell.Range("A1:D2"), Type:= _
xlFillDefault
ActiveCell.Range("A1:D2").Select
ActiveCell.Offset(0, -1).Range("A1").Select

Azt kéne megoldani, hogy a 2. képletben szereplő abszolút hivatkozás aszerint legyen abszolút, hogy hol álltam a kurzorral a macro indításakor, ha erre van mód, de akár teljesen új megoldást is szívesen várok :D
Mutasd a teljes hozzászólást!

  • A képletet ehhez több darabból kell összerakni, és előtte érdemes lenne változókba tenni az indításkor aktív sort és oszlopot.

    Dim ar As Long 'inditaskor aktiv sor szama
    Dim ac As Long 'inditaskor aktiv oszlop szama
    ar = ActiveCell.Row
    ac = ActiveCell.Column

    majd az eredeti 4. sorod erre változna:
    ActiveCell.FormulaR1C1 = "=+R[-2]C/R" & ar & "C" & ac & "-1"

    Feltételeztem, hogy az abszolút hivatkozás az indításkor aktív cellára kellene hogy mutasson.
    Ha szükséges, ac-t és ar-t módosítani kell hozzáadással/kivonással.
    Mutasd a teljes hozzászólást!
  • Köszönöm, de végül találtam egy még egyszerűbb megoldást... kb hülye vagyok h nem jutott eszembe :D 
    Ez lett a 4. sorom : 

    ActiveCell.FormulaR1C1 = "=+R[-2]C/R[-2]C3-1"
    Mutasd a teljes hozzászólást!
  • Így az oszlop hivatkozás mindig a C-re fog mutatni, a sor pedig relatív hivatkozás lesz.
    Szóval így független attól, hogy melyik cella van kiválasztva indításkor.
    Mutasd a teljes hozzászólást!
  • igen, szerintem kicsit félregondoltam az alapkérdést, mentésgemre szóljon késő volt, meg elég low lvl vagyok makróban :D szerencsére működni látszik amit írtam, de köszi amit küldtél mert hasznos lehet később! 

    Még annyi h alapból egy lánc/bázis viszonyszámos idősorelemzés az amihez ez kellett, felteszek egy képet róla. Jelenleg a C6 cellában állva indítva a makrót jó vagyok, és ha lejjebb viszem a következő sorhoz (C9), ott is rendben lefut :) De, C10,C8-ban már nem, ennyiből lett értelme annak, hogy helyhez kötve akartam hogy fusson, csak máshogy magyaráztam, mint ahogy gondoltam szerintem :D
    Mutasd a teljes hozzászólást!
    Csatolt állomány
Ez a téma lezárásra került a moderátor által. A lezárás oka: Témacím… témacím… témacím…
Tetszett amit olvastál? Szeretnél a jövőben is értesülni a hasonló érdekességekről?
abcd