2017-06-24 2 views
0

Ich bin versucht, ein Makro in Excel mit dem folgenden VBA-Code ausführen:VBA - Sendkeys „Enter“ Alternative für Mac Excel 2011

Range("Results").ClearContents 
For counter = 1 To 40 
     Range("constant") = -0.04 + counter * 0.005 
     Solve 
     Application.SendKeys ("{Enter}") 
     Range("Results").Cells(counter, 1) = ActiveSheet.Range("constant") 
     Range("Results").Cells(counter, 2) = ActiveSheet.Range("portfolio_sigma") 
     Range("Results").Cells(counter, 3) = ActiveSheet.Range("portfolio_mean") 
     Range("Results").Cells(counter, 4) = ActiveSheet.Range("x_1") 
     Range("Results").Cells(counter, 5) = ActiveSheet.Range("x_2") 
     Range("Results").Cells(counter, 6) = ActiveSheet.Range("x_3") 
     Range("Results").Cells(counter, 7) = ActiveSheet.Range("x_4") 
Next counter 

zur Laufzeit, erhalte ich eine Fehlermeldung, dass Sendkeys nicht Verfügbar in Excel für Mac. Was ist die effizienteste Alternative/Workaround dafür?

+1

Warum wollen Sie die Enter-Taste gedrückt werden? –

+1

Ja, was ist die "Enter" -Taste, die tatsächlich nach "Solve" eingeht? Eine Promptbox oder bewegliche Zellen oder was? – jamheadart

+1

Was möchten Sie tun, d. H. 40 Zeilen nach unten gehen? – anefeletos

Antwort

1

Wenn Sie Taste drücken Automatisierung verwenden müssen, dann diesen Beitrag check out: https://www.mrexcel.com/forum/excel-questions/436359-visual-basic-applications-sendkeys-mac.html

+0

Danke, aber, wie oben erwähnt, funktioniert SendKeys nicht auf Excel für Mac. Mit anderen Worten, selbst wenn ich es benutzen wollte, kann ich nicht. Deshalb habe ich nach der "effizientesten Alternative/Workaround" gefragt. – user913304

+1

Es tut uns leid, der Link ist über ein Mac-Äquivalent der SendKey-Funktion, sollten Sie es auschecken. – Coffeegrinder

Verwandte Themen