Moin,

ich hab folgendes Problem, und zwar möchte ich eine Makrofunktion erstellen mit der man den Zellinhalt einer markierten Zelle in eine andere frei wählbare Zelle kopieren kann. Bis jetzt sieht meine Funktion so aus:

Sub Makro()

Dim Quellbereich As Range Set Quellbereich = ActiveCell

Quellbereich.Copy Range("C1").Select Selection.PasteSpecial Paste:=x1Values, Operation:=x1None, SkipBlanks:= False, Transpose:=False Application.Cutcopymode = False Quellbereich.Select Quellbereich = "" Range("C1").Select

End Sub

Jetzt ist meine Frage, wie ich "Range("C1") auch über die Auswahl mit der Maus steuern kann. Ich stell mir das mit Pause/Wait und Input neue Zellenauswahl oder so vor. Evnt. auch das man das Makro wie bisher über Strg+y startet und anschließend die Quell und die Zielzelle nach einander markiert.

Moin ich hab folgendes Problem:

Ich will in Exel ein Arbeitsblatt haben in dem man arbeiten kann und eines in dem eine Kopie davon ist wo manche Zellen ausgeblendet werden. Wenn ich jetzt also in dem zweiten Arbeitsblatt eingebe =Blatt1!$A$1 übernimmt er ja den Zellinhalt vom Blatt1 Zelle A1.

Wenn ich jetzt aber bei gehe und in Blatt 1 die Zelle A1 mit der Maus verschiebe zerstört sich die Formel in Blatt 2. Gibt es eine Möglichkeit den Zellbezug (=Blatt1!$A$1) so zu fixieren das er nicht versucht die Formel automatisch anzupassen? Oder kann ich es einstellen, dass ich nur den Zellwert verschiebe (die bedingte Formatierung verschiebt Excel leider auch)?

MFG Marcel