title image


Smiley suche nach einer passenden Schleife
Hallo Excel-perten.



Ich such nach einer passenden Schleife die mir die manuelle Arbeit abnimmt.

Im Moment komme ich einfach nicht auf die Lösung.:-(



Ich habe ein Quadrat aus 9x9 Zellen, dieses hat den Namen "Block1"

beginnend in B2.



Ich möchte nun diesen Block kopieren unter den "Block1" einfügen

und den Namen "Block2" zuweisen.

dann "Block3" ... Block4 ...u.s.w



Der Recorder sagt:

Sub Makro1()

Range("B2:J10").Select

Selection.Copy

Range("B12").Select

ActiveSheet.Paste

Application.CutCopyMode = False

ActiveWorkbook.Names.Add Name:="Block2", RefersToR1C1:= _

"=Tabelle1!R12C2:R20C10"

Range("A1").Select

End Sub



Das geht aber nur zum erstellen des zweiten Blocks

Ich möchte jetzt aber mal 10 mal 100 Blöcke einfügen

und mit einem Namen versehen.



Kann mir da mal einer ne Kopfnuss verpassen?










Gruß Matthias

geschrieben von

Anhang
Bild 10442 zu Artikel 502765

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: