§1: pow(x,y) = x^y = e^{ln[x]*y} = exp(log(x)*y) = x hoch y {das ist in über 20 Programmiersprachen, Iterationsrechner, WolframAlpha so
§2: da Aufgabe und Bild nicht zusammenpassen, musst Du schon die Priorität angeben, was Dir wichtiger ist:
a) Aufgabe hat oberste Priorität: meine erste Antwort
b) "...sieht aber schon viel näher am geforderten aus" -> also Bild hat Priorität
Da Du mein ß1-Trick nicht verstanden hast -> und durch Herunterziehen beide EXCEL-Variablen ändern.
hier der Code für Tabellenblatt "Stepp005":
Sub RechneUndFuelleZellen()
Dim aR As Range
Dim x As Double
Dim y As Double
Dim ySW As Double
Dim yEnd
Dim xEnd
y = -7
ySW = 0.05
yEnd = Round(Abs(y) * 2 / ySW + 1)
xEnd = Round(2 / ySW)
Set aR = Worksheets("Step005").Range("A1")
For Spalte = 0 To xEnd
aR.Offset(0, Spalte + 1).Value = ySW * Spalte
Next Spalte
y = -7
For Zeile = 1 To yEnd
Spalte = 0
aR.Offset(Zeile, Spalte).Value = y
For Spalte = 0 To xEnd
x = ySW * Spalte
aR.Offset(Zeile, Spalte + 1).Value = Sin(x * y) * x ^ 2
Next Spalte
y = Round((y + ySW) * 100) / 100
Next Zeile
End Sub
Ergibt das Bild:
