18. september 2005 - 18:56Der er
7 kommentarer og 1 løsning
Let måde at ændre sti i kæder og makroer
Hejsa
Jeg har et regneark med mange makroer og kæder. Det flyttes hvert kvartal, hvilket betyder at alle kæder og makroer skal ændres.
Da det er brugeren af regnearket der skal gøre denne øvelse, er jeg meget ked af at have ham ind og rette i makroerne og i alle kæderne.
Er der nogen der har en god ide til at løse dette problem. Jeg har selv tænkt at jeg kunne have to celler hvor det første af stierne (en til makroerne og en til kæderne) stod i. Så kunne brugeren ændre stien her.
Ex. Gammel sti: F:/regnskab/2005/1 kvt/ Ny sti: F:/regnskab/2005/2 kvt/
Det der så står i selve makroen er så kun det der kommer efter "kvt/". Hvordan det styres i cellerne kan jeg ikke overskue!
Hvis man benytter celle(1,1) "A1" som utgangspunkt og skal ha data fra cellene: A2, B5, og C5, kan man benytte en offset array til å styre dataflyten øvre rad, Array( 2, 5 , 5) viser raden data ligger i nest rad Array(1,2,3) viser hvilke kolonner data ligger i tilsammen utgjør dette adresse til cellen som data ligger i.
For å lese data til matrise, benytt for-løkke For i = 1 to Ubound(VRowColOffst, 1) vData(i) = .Cells(1, 1).Offset(vRowColOffst(1)(i), vRowColOffst(2)(i)) Next
hvis dette er av interesse, kan jeg kanskje hjelpe :-)
Kæder kan styres lige så nemt som stien i makroen. Bare optag en makro hvor du under rediger / Kæder ændrer kæder til et nyt regneark, og lav samme nummer som kabbak skriver med de to strenge der skal bruges.
Ja, nu skal vi vist have dette spørgsmål lukket dette spørgsmål. jeg har ikke haft mod på at prøve at løse mit problem endnu, men kan I selv blive enige om hvordan pointene skal fordeles? :-)
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.