(sorry wg. neuem Thread aber auf die Frage kann man irgendwie nicht antworten)
Hallo Jürgen,
Versuche Folgendes:
If a = 11 Then Cells(z, a).FormulaLocal = test
Gruß,
Matthias