HERBERS Excel-Forum - die Beispiele

Thema: Wahlauswertung nach Hare-Niemeyer

Home

Gruppe

Funktion

Problem

Wie kann ich die Stimmenzählung nach Hare-Niemeyer in eine Excel-Tabelle integrieren

Lösung
Nur anhand einer Beipspielarbeitsmappe darstellbar.
StandardModule: basMain

Sub DialogAufrufen()
  frmWaehrung.Show
End Sub

Sub WaehrungsAufruf(strWaehrung As String)
  Dim strEuro As String
  Application.ScreenUpdating = False
  strWaehrung = strWaehrung & "%b{enter}"
  Shell "RunDll32.exe Shell32.dll,Control_RunDLL intl.cpl,,2"
  SendKeys strWaehrung, True
End Sub

ClassModule: frmWaehrung

Private Sub cmdAbbrechen_Click()
  Unload Me
End Sub

Private Sub cmdEinstellen_Click()
  Dim strWaehrung As String
  If optDM.Value = True Then
    strWaehrung = "DM"
  ElseIf optEuro.Value = True Then
    strWaehrung = ChrW(8364)
  Else
    strWaehrung = "$"
  End If
  Unload Me
  Call WaehrungsAufruf(strWaehrung)
End Sub

Beiträge aus dem Excel-Forum zu den Themen Funktion und GANZZAHL

Copy funktioniert nur einmal Schreibschutz prüfen funktioniert nicht
Split-Funktion beim Einlesen TXT-Datei Match Funktion spinnt (?)
SVerweis funktioniert nicht PasteSpecial funktioniert nicht.
VBA-Code funktioniert nicht mit anderem Office Hilfe bei der INDEX Funktion
Zelladressen von FunktionsParametern ermitteln Matrixformel mit Summenfunktion
Formel funktioniert nicht, SVerweis Makro funktioniert nach Beenden von Excel nicht
VLOOKUP auf Links funktioniert offline @DAVID Zwei SUMMEWENN funktionen verknüpfen
Zwei SUMMEWENN funktionen verknüpfen Polynomfunktion
Mit vba Funktionen in Excel Zellen Rang-Funktion für Strings?
Skript funktioniert nur auf einer seite?!?! Hyperlink auf Excel-Datei funktioniert nicht
Public Funktion / Variabel VBA - Suchfunktion - Fehlermeldung
Benutzerdefinierte Funktion Userform mit Löschfunktion
Frage zu Wenn Dann Funktion Wenn-Funktion
Frage zur Funktion DISAGIO Funktion um Chart zu kreieren
Wenn-Funktion verschachtelt VBA Suchfunktion erweitern
=C3-(F$1-GANZZAHL(F$1)) in Makro umbauen Makro funktioniert nicht richtig
zählenwenn-funktion mit mehreren kriterien Funktion SVERWEIS
Benutzerdefinierte Funktion in Open Office Funktion Dezimal -> Zeit/ Variablen-Deklaration
Probleme mit Textfunktionen Fehler, wenn Variable in Funktion
VBA-Funktion analog =ZELLE("Zeile") Gültigkeit funktioniert nicht!
Zellausrichtung funktioniert nicht WENN-Funktion
Hide-Funktion in einem Frame Suchfunktion
Date Funktion Filter funktioniert nicht
Funktionsname austauschen Datum in der Funktion VERWEIS
Sub oder Funktion nicht definiert in kleinem Makro Funktion in einer anderen Datei aufrufen