Kezdőlap › Fórumok › Excel témák › [Resolved] képletek másolása változó tartomány nagyságba
- This topic has 3 hozzászólás, 2 résztvevő, and was last updated 5 years, 8 months telt el by
horvimi.
-
SzerzőBejegyzés
-
2020-04-05-16:44 #6960
Sziasztok!
A problémám: Ha egy tartományban lévő képleteket szeretném lemásolni az alatta lévő sorokba, akkor az automatikus kitöltés opció egyértelműen jó. Ennek az utolsó celláját szeretném meghatározni egy tartományon kívül eső cellából.
Range(„D2:G2”).Select
Selection.AutoFill Destination:=Range(„D2:G13”), Type:=xlFillDefault
Range(„D2:G13”).Select
Vagyis az utolsó cella számát jelenesetben csak a „13” szeretném másik cellából venni az oszlop az marad. Így szükség esetén a másolt sorok száma lehet 2- akár 100 is.
Mindenképp ez automatikusan kellene lefusson a makro segítségével.
Köszönettel: Jenő2020-04-06-01:11 #6961Szia!
Gondolom a változó méret szerint szeretnéd a mindenkori utolsó sorig lehúzni a képletet.
Ezzel a módszerrel, előbb szemmel meg kell nézned, hogy hol van a vége, beírni egy cellába, és utána futtatni a makrót.Ezzel szemben meg lehetne állapítani a tartomány utolsó sorát és addig kitölteni. (kis keresés után biztosan megtalálod a neten)
Én most abban próbálok segíteni, amit kértél.
A lényeg, hogy egy változóba eltároljuk a számodat, majd belefűzzük a képletbe.
Ha mondjuk a K1-ben van, hogy hányas sorig menjen a másolás:utolso=Range("K1").Value Range("D2:G2").Select Selection.AutoFill Destination:=Range("D2:G" & utolso), Type:=xlFillDefaultImre
2020-04-06-22:41 #6966Szia Imre!
Köszönöm a meglepően gyors választ, a hétvégéből lecsípve!
Első ránézésre megtetszett a képlet, mert úgy véltem lefut.
Nagy lelkesedéssel rögtön be is másoltam az e-mailből a makrót
Viszont már a bemásoláskor valami szintaktikai hibára utalt. Kipirosozta a bemásolt sorokat, és az & betüre ugrott egy kék kijelölés.
Próbáltam azt a verziót is, hogy a betütípust, ami az e-mailben arial, megváltoztattam calibri-re amit a makró használ, hátha a betük kódja így jó lesz, de nem.Miután kezdtem elkeseredni, az agymba villant, hogy a fordítási hiba abból adódik, hogy a levelező program már egyszer átfordította a képlet betűit.
Ekkor léptem be a fórum oldalra és onnan másoltam ki. A csoda meg is történt!
Értelemszerűen működik!Köszönöm mégegyszer!
Üdvözlettel: Jenő
2020-04-06-22:51 #6968Nagyon örülök, ha örülsz!
-
SzerzőBejegyzés
- Be kell jelentkezni a hozzászóláshoz.
