Erreur d'exécution BASIC. Procédure de sous-procédure ou de fonction non définie

Question

Ce que j'essaie de faire est de compter la moyenne de certaines cellules sur la Macro de LibreOffice Calc ... Par ce code: REM ***** BASIC *** **

Private Sub myrange() 
myrange = Range("G31:G42") 
Range("H45") = WorksheetFunction.Average(myrange) 

End Sub 

Je suis l'erreur: erreur d'exécution BASIC. Sous-procédure ou fonction non définie. Que dois-je faire?

Answer 1

Si vous essayez de la moyenne des cellules G31: G42 et insérer le résultat dans la cellule H45 puis mai macro suivante vous aide:

Private Sub myrange() 
Dim Doc, myrange, sheet As Object 

Doc = ThisComponent 
sheet = Doc.Sheets(0) 
sheet.getCellRangeByName("H45").Formula = "= AVERAGE(G31:G42)" 
End Sub