wenn - Formel und #Bezug
16.08.2003 20:35:02
Mario
ich habe in einem Tabellenblatt eine Wenn Formel
=WENN(TexteKK!$J$15>0;C43;C44)
Diese Formel steht auf dem Tabellenblatt Berechnungen und hat in der wenn-Bedingung den Bezug zum Tabelleblatt TexteKK. Über VBA wird TexteKK gelöscht und wieder aus einer Kopie(SicherTexteKK) wieder hergestellt und dann wieder in TexteKK umbenannt.
Der Hintergrund dieses löschens und wieder herstellen ist, das TexteKK geändert wurde und nach dem Drucken wieder in den Urzustand zurück gesetzt werden muss!
Sub SicherTexte_KK_neu()
Sheets("TexteKK").Select
ActiveWindow.SelectedSheets.Delete
Sheets("SicherTexteKK").Select
Sheets("SicherTexteKK").Copy Before:=Sheets(2)
Sheets("SicherTexteKK (2)").Select
Sheets("SicherTexteKK (2)").Name = "TexteKK"
End Sub
Mein Problem:
Nach diesem Vorgang fehlt der Bezug bei der wenn Formel im Blatt Berechnungen.
=WENN(#Bezug!$J$15>0;C43;C44)
wie kann ich das verhindern!!
Besten Dank
Gruss Mario