Excel in Office 365 für Mac: Drucktitel verändern Adresse der Zellen

Hallo Joachim,

so weit ich weiß, gibt es diese Option in xl2011 nicht. Auch die Seitenränder für die Kopfzeilen lassen sich nicht ändern.

Vielleicht arbeitest du besser mit Wiederholungszeilen (Drucktitel) oben.

Aber du bist hier im Forum für Excel für Windows.

Excel für Mac findest du hier:

http://answers.microsoft.com/en-us/mac/forum/macexcel

Mit freundlichen Grüßen

Claus

nah... will nur das gewissen Zellen geschuetzt sind, damit keiner die Formeln ausversehen veraendern kann.



Das ist der erste Befehl (teil einer Userform daher der Aufbau).



Der zweite Befehl ist dann das man die Zellen wieder entsperren kann damit man Formeln etc wieder bearbeiten kann.



Wenn ich es direkt in Excel mache, dann halt ueber Data Validation, Custom und dann box=""



und ich hoffe mal als Teil eines Makros ist es so wie oben gepostet

Tja, dumm gelaufen. ;-)

Wenn Du die Daten nebeneinander kopierst, dann kann "Wiederholungszeilen oben" nicht funktionieren, da die erste Zeile über alle Daten geht. Ich vermute mal das Du das so probiert hast.

Hier würde nur "Wiederholungsspalten links" gehen.

Man kann das aber sehr einfach mit einer Formel simulieren, schalte zuerst die Ansicht auf Seitenlayout.

Dann klickst Du auf die erste Zelle der 2ten Seite und gibst dort die Formel =A1 ein.

Markiere nun alle Zellen von dieser bis nach rechts soweit die Daten reichen und drück STRG-R.

Damit hast Du nun in der ersten Zeile Formeln stehen die die Überschrift quasi kopieren.

Andreas.

Hallo Frank



Besten Dank für deinen Lösungsansatz. Die Lösung von Claus konnte mein Problem bereits beheben

Aber vielleicht hilft es ja auch noch anderen Usern mit analogem Problem.



Gruss

Harri

Hallo Harri,

eine mögliche Formel lautet:

=GROSS(TEIL(D13;1;2)&"-"&TEIL(D13;3;2)&"-"&TEIL(D13;5;2)&"-"&TEIL(D13;7;2)&"-"&TEIL(D13;9;2)&"-"&TEIL(D13;11;2))

Und als Makro (markiere vor dem Start des Makros die Zellen mit der MAC-Adresse):

Sub MAC()

Dim rngZelle As Range

Dim intI As Integer

Dim strMAC As String

Dim strDummy As String

For Each rngZelle In Selection.Cells

strDummy = rngZelle.Value

For intI = 1 To 11 Step 2

strMAC = strMAC & UCase(Mid(strDummy, intI, 2)) & "-"

Next

rngZelle.Value = Left(strMAC, 17)

Next

End Sub

Mit freundlichem Gruß aus der Rattenfängerstadt Hameln



---

www.at-exceltraining.de