Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema CommandButton
BildScreenshot zu CommandButton CommandButton-Seite mit Beispielarbeitsmappe aufrufen

Befehl durch farbige Markierung | Herbers Excel-Forum


Betrifft: Befehl durch farbige Markierung von: s-kipper@t-online.de
Geschrieben am: 02.01.2010 12:52:15

Guten Tag und ein frohes neues Jahr!
Habe mir über Excel eine Kostenaufstellung der monatlichen Zahlungen angelegt und möchte nun, sobald eine Zahlung getätigt wurde den Betrag farblich markieren...
Besteht die Möglichkeit, dass sobald der Betrag markiert wurde in der Autosumme der Betrag abgezogen wird?
Vielen Dank im Voraus
Sven

  

Betrifft: AW: Befehl durch farbige Markierung von: Reinhard
Geschrieben am: 02.01.2010 13:04:27

Hallo Sven,

erstell doch mal eine beispielmappe, wo du manuell färbst was dann später automatisch geschen soll und lade sie hier hoch.

Gruß
Reinhard


  

Betrifft: AW: Befehl durch farbige Markierung von: s-kipper@t-online.de
Geschrieben am: 02.01.2010 13:37:58

https://www.herber.de/bbs/user/66921.xlsx

Hoffe es hat funktioniert!

Gruß
Sven


  

Betrifft: AW: Befehl durch farbige Markierung von: Hajo_Zi
Geschrieben am: 02.01.2010 13:07:32

Hallo Sven,

mit Hilfsspalte.

Tabelle1

 AB
111
223
331
44 

verwendete Formeln
Zelle Formel
B1 =Schrift
B2 =Schrift
B3 =Schrift
A4 =SUMMEWENN(B1:B3;"<>3";A1:A3)

definierte Namen
Name Bezieht sich auf Tabelle Z1S1-Formel
Schrift=ZELLE.ZUORDNEN(24;INDIREKT("ZS(-1)";FALSCH)) =ZELLE.ZUORDNEN(24;INDIREKT("ZS(-1)";FALSCH))

Tabellendarstellung in Foren Version 5.3



GrußformelHomepage


  

Betrifft: AW: Befehl durch farbige Markierung von: s-kipper@t-online.de
Geschrieben am: 02.01.2010 13:42:59

Hallo Hajo,

habe mal eine Beispiel-Tabelle beigefügt (danke an Reinhard für den Tipp)...

Gruß
Sven

https://www.herber.de/bbs/user/66922.xlsx


  

Betrifft: AW: Befehl durch farbige Markierung von: Hajo_Zi
Geschrieben am: 02.01.2010 15:38:09

Hallo Sven,

geht mein Vorschlag bei Dir also nicht?

Gruß Hajo


  

Betrifft: AW: Befehl durch farbige Markierung von: s-kipper@t-online.de
Geschrieben am: 02.01.2010 16:01:58

Hallo,

wenn ich ehrlich bin, komme ich damit leider nicht so richtig zurecht!
Sorry, aber ich habe nur sehr wenig Erfahrung mit Excel...

Gruß
Sven


  

Betrifft: AW: Befehl durch farbige Markierung von:
Geschrieben am: 02.01.2010 16:57:29

hi,

hab mir deine datei angesehen, mir ist aber nicht klar,, was du wo abziehen
willst.

warum nur die gelben ? was ist bei dir Autosumme?

gehts vielleicht verständlicher ?

gruß
robert


  

Betrifft: AW: Befehl durch farbige Markierung von: s-kipper@t-online.de
Geschrieben am: 02.01.2010 17:14:24

https://www.herber.de/bbs/user/66929.xlsx

Hallo Robert,

habe es abgeändert...

Gruß
Sven


  

Betrifft: noch immer nicht klar... von: robert
Geschrieben am: 02.01.2010 17:40:07

hi,

von welchem betrag sollen die gelben abgezogen werden?

mach doch deine berechnung einmal per hand,
um zu sehen, was du wo abziehen willst.

gruß
robert


  

Betrifft: AW: noch immer nicht klar... von: s-kipper@t-online.de
Geschrieben am: 02.01.2010 18:15:08

Hallo,

sorry, dass ich es so umständlich beschrieben habe...
Hier nochmals vereinfacht.

https://www.herber.de/bbs/user/66930.xlsx


Vielen Dank für Deine Mühe

Gruß
Sven


  

Betrifft: AW: noch immer nicht klar... von: Matthias L
Geschrieben am: 02.01.2010 18:21:29

Hallo

Ich hab das mal grob so umgesetzt

https://www.herber.de/bbs/user/66932.xls

Gruß Matthias


  

Betrifft: ..jetzt schon... ;-) Gruß von: robert
Geschrieben am: 02.01.2010 18:38:12




  

Betrifft: AW: ..jetzt schon... ;-) Gruß von: s-kipper@t-online.de
Geschrieben am: 02.01.2010 18:52:13

Hallo Matthias,

vielen Dank, echt super! Geht es auch ohne den "Berechnen-Button"? Wenn nicht, auch nicht so tragisch...
Wäre echt nett, wenn Du das ganze noch auf die komplette Tabelle anwenden könntest. Vielen Dank hierfür!

Gruß
Sven


  

Betrifft: ohne Button: Nein von: Matthias L
Geschrieben am: 02.01.2010 20:07:48

Hallo

hier für alle Monate:
https://www.herber.de/bbs/user/66938.xls

Gruß Matthias


  

Betrifft: AW: ohne Button: Nein von: s-kipper@t-online.de
Geschrieben am: 02.01.2010 20:13:38

Vielen, vielen Dank!

Somit ist mein Problem vollständig gelöst!

Gruß
Sven


  

Betrifft: hier nochmal im Code kürzer, als Schleife von: Matthias L
Geschrieben am: 03.01.2010 04:18:09

Hallo Sven

Ersetze einfach den alten Code durch diesen Code

Option Explicit
Private Sub CommandButton1_Click()
Dim rng As Range, dblwert As Double, lng As Long
 For lng = 1 To 12
  dblwert = 0
   For Each rng In Range(Cells(4, lng), Cells(24, lng))
    If rng.Interior.ColorIndex = 6 Then dblwert = dblwert + CDbl(rng.Value)
   Next
  Cells(30, lng) = dblwert
 Next
End Sub
Gruß Matthias


  

Betrifft: AW: hier nochmal im Code kürzer, als Schleife von: s-kipper@t-online.de
Geschrieben am: 03.01.2010 09:45:39

Guten Morgen,

sorry, aber leider habe ich keine Ahnung wie ich dies anstellen soll !?

Gruß Sven


  

Betrifft: hier die Datei von: Matthias L
Geschrieben am: 03.01.2010 10:21:02

Hallo

https://www.herber.de/bbs/user/66943.xls

Gruß Matthias


  

Betrifft: AW: hier die Datei von: s-kipper@t-online.de
Geschrieben am: 03.01.2010 11:38:50

Vielen Dank und einen schönen Sonntag noch!

Gruß
Sven


  

Betrifft: AW: ben. def. Function von: hary
Geschrieben am: 02.01.2010 18:16:34

hallo Sven
hier mal mit einer Benutzer defenierten Function. Formel in A26. Function heisst addieren.
https://www.herber.de/bbs/user/66931.xlsm
gruss hary


Beiträge aus den Excel-Beispielen zum Thema "Befehl durch farbige Markierung"