BMI-Rechner mit VBA bei Excel programieren?

Hallo, könntet ihr mir eine ausfühliche Anleitung geben, wie ich einen BMI rechner bei Excel programmire( mit VBA)?

3 Antworten

Vom Beitragsersteller als hilfreich ausgezeichnet

floppydisk

Nutzer, der sehr aktiv auf gutefrage ist

im Thema Microsoft Excel

04.02.2014, 10:11

warum brauchst du vba bei so etwas simplen? da reicht eine supereinfache excel-formel.

BMI = (m/l²), wobei masse in kilogramm und länge in metern angegeben wird.

das ergebnisfeld kannst du noch mit bedingter formatierung entsprechend grün bis rot färben lassen. aufwand: 1-2min.

Woher ich das weiß:Berufserfahrung – Arbeite im Controlling & (Personal)Management

Wumpratte

04.02.2014, 10:09

Werte einlesen, rechnen button(der rechnet hat per formel) und ausgabe

Oubyi, UserMod Light

04.02.2014, 12:33

Super!
Den Algorithmus hätten wir.
Jetzt noch schnell den Code dazu.

daCypher

04.02.2014, 14:03

@Oubyi, UserMod Light

Der Code sieht ungefähr so aus:

Private Sub btnOK_Click()
    txtErgebnis = txtGewicht/(txtGroesse^2)
End Sub

Wie der Button und die Textfelder heißen, kann man selbst bestimmen. Wie man ein Formular baut, erkläre ich nicht

daCypher

Von gutefrage auf Grund seines Wissens auf einem Fachgebiet ausgezeichneter Nutzer

programmieren

04.02.2014, 10:10

Wieso willst du das mit VBA machen? Nimm einfach A1 als Eingabefeld für die Größe und B1 als Eingabefeld für das Gewicht, dann kannst du in C1 die Formel =B1/(A1^2) reinschreiben und schon steht dort der BMI.

Ähnliche Beiträge

Ich suche Hilfe für Excel VBA Programmierung, kann jemand helfen?

Guten Morgen Allseits,

ich suche nach einem Schema, Erklärung Schritt für Schritt für Excel VBA Programmierung:

Habe von dem Prof. eine Anleitung dazu bekommen, aber das ist mehr so eine Märchengeschichte.

Nun seid IHR gefragt, habt ihr eine gute Quelle für mich wo das kurz und bündig, aber effizient erklärt wird?

Vielen Dankeschön Euch!

...zum Beitrag

VBA: Variablenwert aus Textbox in Zahl ausgeben?

Moin,

Ich möchte aus einer UserForm (Textbox) einen wert (numerisch) als Zahlenwert in eine Zelle ausgeben.

Mein Problem besteht darin, dass Excel den wert als Text erkennt...

Public gewicht As Single
'----
ActiveSheet.Cells(7 , 6).Value = gewicht

Hat jemand eine Idee, wie ich da eine Zahl, mit der ich in Excel selber rechnen kann, draus macht

...zum Beitrag

Excel VBA Seitengröße festlegen?

Hi. Ich habe folgendes Problem. Ich habe in einer Excel Datei ein Tabellenblatt so aufgebaut, dass es auf eine A3 Seite passen würde. Auf dem selben Blatt befindet sich ein Makro, welches mir die Seite als PDF abspeichert. So weit so gut. Jetzt habe ich das Problem, dass das Tabellenblatt im falschen Format angezeigt wird, wenn ich es an einem Computer öffne, der kein Zugriff auf einen A3 Drucker hat. Ich hab es mit Worksheets("...").PageSetup.PaperSize = xlPaperA3 versucht, aber diesen befehl möchte Excel nicht aktzeptieren, da kein A3 Drucker vorhanden ist. Hat jemand von Euch eine Idee, wie ich die Seitengröße festlegen kann unabhängig davon, ob es der eingestellte Drucker drucken könnte oder nicht? Drucken will ich es ja sowieso nicht :). Danke für Eure Antworten.

Edit: Es würde mir vermutlich auch schon reichen, wenn jemand von Euch einen Befehl kennt, mit dem ich den standard PDF Drucker auswählen kann, der auf so gut wie jedem rechner vorhanden ist?! Dann müsste ich den oben genannten Befehl nutzen können.

...zum Beitrag

Mit Excel VBA bestimmte Zeilen in anderes Tabellenblatt kopieren?

Hallo zusammen!

Wie schaffe ich es in Excel mithilfe von VBA eine bestimmte Zeile, welche in der ersten Spalte mit einem Index (1.1, 1.2 ...) gekennzeichnet wurde, durch die Angabe des Indexes die genaue Zeile in mein anderes Tabellenblatt zu kopieren.

Ich gebe also zum Beispiel im Tabellenblatt 2 in die erste Spalte "1.2" ein und es kopiert automatisch die mit "1.2" gekennzeichnete Zeile aus dem Tabellenblatt 1 in das Tabellenblatt 2.

Vielen Dank schonmal

...zum Beitrag

Excel VBA: objektbibliothek ist ungültig oder enthält verweise?

Hallo. Ich bin hier gerade echt aufgeschmissen.

Wir haben eine Excel Mappe mit Makros. Das funktioniert an sich ja sehr gut. Nur gibt es hier einige wenige PC's die die Mappe zwar öffnen und speichern können aber dann gehen die Probleme los.

Sobald einer dieser Rechner die Mappe speichert, kommt auf allen anderen Rechnern ein Kompilierungsfehler: "Objektbibliothek ist ungültig oder enthält Verweise, die nicht gefunden werden konnten"

Ich habe zu diesem Problem nur eine Lösung mit Killbits und dem ActiveX Compatibility Manager gefunden. Das hat aber auch zu nichts geführt.

Die Fehlermeldung ist noch mal im Anhang.

Vielleicht kennt sich ja hier jemand aus.

Danke im Vorraus.

...zum Beitrag

Excel VBA - Tabellenblatt kopieren, in Folgemonat umbenennen und Wert aus momentanem Monat übertragen. Kann mir jmd. helfen?

Hallo,

Ich hab so gut wie keine Ahnung von Excel-VBAs, aber den Auftrag bekommen ein Tool zu erstellen, welches ein Vorlagen-Tabellenblatt kopiert, die Kopie dann in den nächsten Monat (Monatsnamen-Abkürzung + Jahr) umbenennt und zu Letzt einen Wert aus dem vergangenen Monat in den neuen überträgt.

Für jeden Monat soll es also ein Tabellenblatt geben.

Ich hab festgestellt, dass man mit dem Aufnahme-Tool da nicht sehr weit kommt.

Die Vorlage kopieren und umbenennen funktioniert auch schon fast, allerdings stimmt das Format noch nicht.

Ich habe keine Ahnung, welchen VBA-Befehl es benötigt um das vorherige Tabellenblatt auszuwählen, damit der Wert dann kopiert werden kann.

Vielen Dank jetzt schon einmal.

...zum Beitrag

Excel: Button, der bestimmte Felder leert?

Ich muss bei meiner Aufgabe einen Button einfügen, der mit einem Klick gewisse Felder leert, ich darf aber keinen VBA-Code o.ä. verwenden. Mein Lehrer hat irgendetwas von Makros gesagt, weiß aber leider nicht mehr genau wie das funktioniert... Wäre euch sehr dankbar, wenn ihr mir weiterhelfen könntet!

...zum Beitrag

Mit Access und VBA einen formatierten Excel-Export durchführen?

Guten Tag, ich hänge mal wieder bei einer Access - Excel Frage fest.

Ich habe ein Access eine Abfrage geschrieben, die mir sortiert eine ID, den zugehörigen Namen und alle dazu zugewiesenen Daten ausgibt.

Da jede Id + name mehrere Daten haben kann, steht das ganzen in mehreren zeilen untereinander. Ich möchte das ganze nun in eine Excel-Datei via Makro exportieren und das ganze so formatieren das Id + name nur einmal drann steht und dann alle Daten.

Das ganze sieht also eig. so aus.

id || name || daten

1 || n1 || daten1

1 || n1 || daten2

1 || n1 || daten3

und soll in der Exel Datei dann so aussehen.

id || name || daten

1 || n1 || daten1

_ || _ || daten2

_ || _ || daten3

_ bedeutet das dort kein Eintrag in der Zelle mehr steht. Ich habe das bisher so gemacht, das ich Die Daten aus Access händisch in eine Excel kopiert habe und dann dort mit einem Makro alles raus sortiert habe. Dim xErsteZeile As Long Dim xZeile As Long

        xErsteZeile = Cells(Rows.Count, 1).End(xlUp).Row
    
        For xZeile = xErsteZeile To 1 Step -1
          If Application.WorksheetFunction.CountIf(Columns(1), Cells(xZeile, 1).Value) > 1 Then
                Range("A" & xZeile).Select
                Selection.Delete Shift:=xlUp
                Range("B" & xZeile).Select
                Selection.Delete Shift:=xlUp
          End If
        Next

Ich würde das ganze jetzt aber über Access machen da es ja der Ausgangspunkt ist. Wenn ich ein Export in ACCES anschaue in VBA sieht dieser ja so aus.

    DoCmd.OutputTo acOutputQuery, "jh_01_01_Abfrage", "Excel97-Excel2003Workbook(*.xls)", "", True, "", , acExportQualityPrint

kann ich davor die Daten noch bearbeiten wie in Excel? Und wenn ja kann mir eventuell jemand einen Tipp geben?

Würde mich sehr freuen.

Grüße

Frost.

...zum Beitrag

Excel VBA: WENN … DANN Teilbereiche auswählen und kopieren?

Wie schreibe ich das in VBA? Dankeschön

...zum Beitrag

Wie erstelle ich einen Prozentwert Rechner in VBA (Excel)?

Moin ich habe ein Problem und zwar ist es so, dass ich einen Rechner erstelle möchte der die Zahl in Textfeld 1 x die Zahl in Textfeld 2 / die Zahl in Textfeld 3 nimmt und das Ergebnis dann in Textfeld 4 schreibt , wenn man auf einen Commandbutton drückt . Also Zahl1 x Zahl2/ Zahl3 = Zahl 4. Die Oberfläche hab ich schon gemacht

...zum Beitrag

BMI Rechner in C Programmieren (Fach Spezifische Softwaretechnik , so heisst das Schulfach )?

Wir sollen für die schule einen BMI Rechner programieren aber bei mir kommt immer das Gewicht als ergebnis . Thx für die Antworten im Voraus Code : (mit DEV C++ geschrieben)

include <stdio.h> include <stdlib.h>

/* run this program using the console pauser or add your own getch, system("pause") or input loop */

float bmi(float l,float m);

int main(int argc, char *argv) {

float l; float m; float bmi_;

printf("Geben Sie ihre Koerpergewicht in Kg ein :");

scanf("%f",&m);

printf("Geben sie ihr Koerpergroesse in ein :");

scanf("%f",&l);

bmi_ = bmi(l,m);

printf("%f\n",bmi_);

system("PAUSE"); return 0; }

float bmi(float l,float m) {

return m/(l*l); }

...zum Beitrag

VBA-Makro nachts automatisch ausführen lassen?

Heyho,

ich würde gerne für mein Informatikstudium ein VBA-Excel-Makro nachts ausführen lassen (reines CopyPaste-Makro). Ich habe das auf meinem Rechner, der immer an bleibt mal mit der Funktion "Application.OnTime Uhrzeit, Makroname" getestet. Am ersten Tag wurde das Makro nachts ausgeführt, am nächsten Tag nicht. Mir ist aufgefallen, dass ich mich einmal anmelden muss, sonst wird das Makro nicht ausgeführt? Da es am dritten Tag wieder ausgeführt wurde. (Der Rechner bleibt sicher immer an). Taskplaner möchte ich nicht einsetzen.

Was mache ich falsch, bzw. kann mir jemand helfen ? Kann ich das Makro auch anders nachts täglich ausführen lassen ? Wäre sehr dankbar für eure Hilfe?<br>

Danke,danke für jeden Tipp :-)

Grüßchen Sarah

...zum Beitrag

Excel | Uhrzeit-Rechner?

Guten Abend zusammen.

Kurze Frage:

Wie kann ich so ein Uhrzeit-Rechner in Excel erstellen? (ohne VBA und großes Design)

Danke im Voraus!

Mit freundlichen Grüßen: Robin | TechBrain. :)

...zum Beitrag

Excel VBA - Ansicht auf jedem Rechner gleich machen?

Hallo,

wir haben unterschiedliche Arbeitsplätze mit diversen Druckertreibern.
Dadurch sehen manche Excel-Tabellen bei jedem unterschiedlich aus, wodurch die Zeilen teilweise auf eine neue Seite verschoben werden.

Kann man das ggf. mit Excel-VBA sicherstellen, dass es gleich bleibt?

Danke im Voraus.

...zum Beitrag

Was möchtest Du wissen?

Deinen Beitrag erstellen