hai ihr!
ich will das excel innerhalb einer prozedur
die bei Worksheet_Calculate() ausgeführt werden soll
mit zb range(„A1“).select ein feld selektiert.
tija. kommt aber immer nur
„die select-methode des range objektes konnte nicht ausgeführt werden“.
warum denn das?
ich verstehe nur bahnhof!
warum funktioniert das zb. bei selection.change ohne probleme…
gruß
herpes
hai ihr!
ich will das excel innerhalb einer prozedur
die bei Worksheet_Calculate() ausgeführt werden soll
mit zb range(„A1“).select ein feld selektiert.
tija. kommt aber immer nur
„die select-methode des range objektes konnte nicht ausgeführt
werden“.
warum denn das?
wie sieht denn die gesamte prozedur aus?
gruß
michael
der sich’s so auch net erklären kann, daß das net funktioniert.
hier die prozedur
hallo michale
die ganze sub sieht so aus:
muss allerdings noch dazu sagen das diese in einer tabelle liegt die über „>objekt einfügen“ in eine tabelle eingefügt wurde.
die schleifen haben den sinn, so viele „x“-se in die zellen zuschreiben wie in den variablen spaltenzahl und zeilenzahl an werten angegeben wurde.
spaltenzahl und zeilenzahl bekommen ihren werte aus der datei, in die diese tabelle eingefügt worden ist über einen zellenverweis.
uff.
so. also:
Private Sub Worksheet_Calculate()
i = 1
n = 2
If Range(„A1“) = „“ Then GoTo Exit_sub_a
spaltenzahl = Range(„A1“)
Do Until i > spaltenzahl
i = i + 1
Range(„A“ & i) = „X“
Loop
Exit_sub_a:
If Range(„B1“) = „“ Then GoTo Exit_Sub
zeilenzahl = Range(„B1“)
Do Until n > zeilenzahl
n = n + 1
z = Chr(n + 64)
Range(z & „1“) = „X“
Loop
'wenn ich hier range(„a1“).select einfüge gibts ne fehlermeldung
Exit_Sub:
End Sub
ich hoffe du verstehst n bisschen von dem
und danke für deine mühe
gruß
herpes
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
hm. da bin ich aber jetz auch ratlos. bei mir funktioniert’s so. ich werd’s nachher nochmal mit ner älteren excel-version probieren.
hast du’s schon mal mit range(„a1“).activate versucht?
gruß
michael