egy kis segítséget kérnék, talán itt észreveszi valaik


szóval win xp alá akarom feltenni a visual studio 6.0-át, de sajnálatos módon nem tudom.... kiakad valami olyan üzenettel, hogy 16-bites alrendszer telepítése nem lehetséges... tud valaki valami trükköt??? vagy legalább valami infót, hogy mi lehet a baja...

elpőre is köszönöm a segítségeteket!!!

köszi érdeklődésedet, de már sikerült megoldanom a problémát.
mégegyszer köszi

Ezt egy kissé szájbarágósabban, lépésről-lépésre kellene elmagyarázni.
Én sem értem a feladatot.

Lejjebb tolod tartományt 10 cellával, vagy lejjebb másolod?
Előző cella alatt a D13 esetében a D3-at, vagy D12-t érted?
KB 100 szor ismételni? Mitől függ, hányszor?

Egy feladatmeghatározásnak pontosnak kell lennie.

És mik a kérdéseid?

Kedves Mindenki !
Ha nem volt érthető a probléma akkor biztosan én vok a hibás !

Más fórumon segitettek és senki nem tett ilyen megjegyzést mint te _optikus !

Nem igazán értem a problémádat, mert sztem egy fórum nem csak azért van, hogy elbeszélgessünk egymással, hanem azért ha vkinek kell gyors segitség akkor kapjon segitséget....persze ha van aki hajlandó irni.

Szóval optikus ebben az esetben kimélj meg a kioktató dumádtól !

Szeretem amikor valaki munkahelyi melojat (amiert ugye fizetnek) atlocsoli ide a forumra (nade azt is hogy) es azonnal koveteli a megoldast

Eszre kene mar venni hogy az ilyen forum nem fizetett support hanem onkentes szabadidos segitsegnyujtas.

szivesen segítek, ha érthetően elmagyarázod, mit akarsz.. (Ugyanis a kérdésed és a makró átnézése némi zavart okoz a fejemben)

senki nem tud segiteni ?

Sziasztok !

A munkahelyemen van egy igen munkás feladatom excelben.. segitségetekre lenne szükségem.
MAkró felvevővel felvettem amit szeretnék csinálni.Sajnos v.b-ben nem ismerem a szintaktikát (nem is vok programozó).
A kód adott. Azt szeretném, hogy minden egyes cella pl D3 legyen D13 és igy tovább. mindig minden egyes ciklus után az előző cella értékhez adjon hozzá 10 -t a progi

Ezt for ciklusban kellene megismételni (vagy vmi másban) kb 100-szor

Remélem válaszol vaki
köszi



Sub próba2()
'
' próba2 Makro
'
'

'
Rows("4:4").Select
Selection.Insert Shift:=xlDown
Selection.Insert Shift:=xlDown
Selection.Insert Shift:=xlDown
Selection.Insert Shift:=xlDown
Selection.Insert Shift:=xlDown
Selection.Insert Shift:=xlDown
Selection.Insert Shift:=xlDown
Selection.Insert Shift:=xlDown
Selection.Insert Shift:=xlDown
Selection.Insert Shift:=xlDown
Selection.Insert Shift:=xlDown
Selection.Insert Shift:=xlDown
Range("D3").Select
Selection.Copy
Range("C4").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Range("E3").Select
Selection.Copy
Range("C5").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Range("F3").Select
Selection.Copy
Range("C6").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Range("G3").Select
Selection.Copy
Range("C7").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Range("H3").Select
Selection.Copy
Range("C8").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Range("I3").Select
Selection.Copy
Range("C9").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Range("J3").Select
Selection.Copy
Range("C10").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Range("K3").Select
Selection.Copy
ActiveSheet.Paste
Application.CutCopyMode = False
Selection.Copy
Range("C11").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Range("L3").Select
Selection.Copy
Range("C12").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Range("N3:O3").Select
Selection.AutoFill Destination:=Range("N3:O12"), Type:=xlFillDefault
Range("N3:O12").Select
Range("P3:R3").Select
Selection.AutoFill Destination:=Range("P3:R12"), Type:=xlFillDefault
Range("P3:R12").Select
End Sub