Home Office-Hilfe.com - Wir lösen Ihr Problem mit Microsoft Excel, Word, Outlook, PowerPoint, Access gratis Forum Impressum

 [Excel 2003] zusätzlicher 'Summe einfügen'-Button in Tabellenblatt
Neues Thema eröffnenNeue Antwort erstellen
Autor Nachricht
Fran3000
Newbie
Newbie


Anmeldedatum: 23.01.2008
Beiträge: 18

BeitragVerfasst am: 30.09.2008, 12:05 Nach oben

Ich brauche Hilfe bei folgendem Problem:

Ich habe eine Excel-Tabelle mit 6 Spalten, die als Grundlage für eine Rechnung dient:

Position --- Artikel-Nr. --- Artikel-Beschreibung --- Menge --- Einzelpreis --- Gesamt

Mit Hilfe aus diesem Forum habe ich außerdem einen ‚Summe einfügen’ – Button in dem Tabellenblatt. Ein Klick darauf und es werden

-> Summe
-> zzgl. 19% MwSt.
-> Gesamt

als Wort & Wert (unter der Spalte Gesamt) eingefügt.

--------------

Ich würde nun gerne ZUSÄTZLICH einen zweiten Button haben, der

-> Summe
-> zzgl. Versandkosten
-> zzgl. 19% MwSt.
-> Gesamt

als Wort & Wert (Versandkosten mit einem Fixwert von z.B. 4,00) einfügt.

Ist dies möglich?
Wie würde der Code dafür lauten?



----------------------Code für Button 1: -------------------------------

Option Explicit

Private Sub CommandButton1_Click()
Dim x As Integer
x = [=MAX((D1:D1000<>"")*ROW(1:1000))] + 1
Cells(x, 6) = WorksheetFunction.Sum(Range(Cells(1, 6), Cells(x - 1, 6)))
Cells(x + 1, 6) = Cells(x, 6) * 0.19
Cells(x + 2, 6) = Cells(x, 6) + Cells(x + 1, 6)
Cells(x, 5) = "Summe"
Cells(x + 1, 5) = "zzgl. 19% MwSt."
Cells(x + 2, 5) = "Gesamt"
End Sub
Benutzer-Profile anzeigenPrivate Nachricht senden
< Peter >
Schlauberger
Schlauberger


Anmeldedatum: 30.08.2008
Beiträge: 235
Wohnort: Das schönste Land in Deutschlands Gaun

BeitragVerfasst am: 03.10.2008, 17:20 Nach oben

Hallo,

das Problem dürfte sich erledigt haben:

http://www.office-hilfe.com/support/topic,10359,-verlinkung-von-schaltflaeche-mit-code-fuer-commandbutton.html

_________________
Gruß
Peter
Benutzer-Profile anzeigenPrivate Nachricht senden
Beiträge der letzten Zeit anzeigen:      
Neues Thema eröffnenNeue Antwort erstellen


Ähnliche Beiträge
Thema Autor Forum Antworten Verfasst am
Keine neuen Beiträge Bei Änderung Datum automatisch einfügen annewill1234 Microsoft Excel Hilfe 1 19.11.2008, 17:26 Letzten Beitrag anzeigen
Keine neuen Beiträge Button "Dateispeicherort" a... tobias.s Microsoft Word Hilfe 0 19.11.2008, 15:44 Letzten Beitrag anzeigen
Keine neuen Beiträge Fotoalbum automatisch einfügen - Über... Snazooh Microsoft PowerPoint Hilfe 0 15.11.2008, 11:45 Letzten Beitrag anzeigen
Keine neuen Beiträge Daten aus Spalten von Tabellenblatt 1... leenie Microsoft Excel Hilfe 2 14.11.2008, 10:52 Letzten Beitrag anzeigen
Keine neuen Beiträge Makro Einfügen/Paste Befehl immer in ... Skatgott Microsoft Excel Hilfe 1 12.11.2008, 16:17 Letzten Beitrag anzeigen


 Gehe zu:   



Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum posten
Du kannst Dateien in diesem Forum herunterladen

Haftungsausschluss/Disclaimer


SMS kostenlos versenden | Battle-Dream | Tuning Forum | Join the YoungGeneration | krankenversicherungsvergleich | Kalorienarme Rezepte!
Versicherungsvergleich | Bürobedarf | Papier | Betten

Ranking-Hits



Powered by phpBB © 2001, 2002 phpBB Group :: FI Theme :: Alle Zeiten sind GMT + 1 Stunde
Deutsche Übersetzung von phpBB.de