Ich glaube das Öffen und Schliessen der Datei ist das bremsende Element.
Entweder die Messergebnisse sammeln und nur jedes 10. Mal alle Werte schreiben, oder (vielleicht einfacher und besser) die Datei nicht innerhalb der Hauptsprogrammschleife öffnen und schliessen sondern dort nur das Schreiben erledigen.

nebenbei:

Dim Referenzspannung As Word
Referenzspannung = 3.85

das überleben die Nachkommastellen?

Gruß MeckPommER