Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
904to908
904to908
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Aktion bei Änderung in bestimmten Bereich

Forumthread: Aktion bei Änderung in bestimmten Bereich

Aktion bei Änderung in bestimmten Bereich
06.09.2007 20:14:00
Sascha
Hi,
ich möchte, dass ein Sub immer dann abläuft, wenn in einer bestimmten Range (meinetwegen Range("A1:D5"), eine Eingabe gemacht wird, also etwas verändert wird. Wie macht man das am schlausten? Will es nicht mit Worksheet_Change machen...
Danke,
sascha

Anzeige

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Aktion bei Änderung in bestimmten Bereich
06.09.2007 20:22:32
Hajo_Zi
Hallo Sascha,
dann hast Du kein Möglichkeit.

keine Ahnung, wie das gehen soll ?
06.09.2007 20:23:00
Matthias
Hallo
Eine andere Möglichkeit, als Worksheet_Change bei VBA ist mir nicht bekannt.
Allerding arbeite ich mit Excel2000.
Evtl. gibts ja in einer neueren Version Unterschiede.
Userbild

Anzeige
AW: Aktion bei Änderung in bestimmten Bereich
06.09.2007 21:56:00
Hubert
Hi,
"...Will es nicht mit Worksheet_Change machen..."
Sicher hast du deine Gründe dafür, welche?
mfg Hubert

AW: Aktion bei Änderung in bestimmten Bereich
06.09.2007 22:19:27
Sascha
Der Grund ist der, dass ich in dem Tabellenblatt viele Einträge mache und das Sub etwas länger sit (momentan mache ich die Aktion, die an 10 Feldern ausgeführt werden soll, über eine etwas umständliche Schleife). Die Folge ist, dass wenn bei jeder Änderung das Sub durchlaufen wird, auch wenn die Änderung gar nicht in einem relevanten Bereich war, dass das jedes mal ganz schön dauert...

Anzeige
AW: Aktion bei Änderung in bestimmten Bereich
06.09.2007 22:32:16
Josef
Hallo Sascha,
warum sagst du nicht was bei Änderungen in welchem Bereich geschehen soll?
Zeig doch deinen bisherigen Code.
Gruß Sepp

AW: Aktion bei Änderung in bestimmten Bereich
06.09.2007 22:46:34
Sascha
Stimmt, wär vielleicht am einfachsten.
Es geht um eine statistische Sache, bei der Muskelfasern ausgezählt werden. Dazu werden einzelne Zählungen gemacht und in Excel gleich addiert. Das muss solange gemacht werden, bis mehr als 250 Fasern gezählt sind. Das wollte ich optisch "untermalen". Und das ganze dann 10 mal in einer Tabelle:
Option Explicit
</p><pre>Private Sub Worksheet_Change(ByVal Target As Range)
Dim Wert As Integer
Dim wks As Worksheet
Dim c As Integer
Dim Zeile As Integer
Set wks = Sheets("Tabelle1")
For c = 0 To 9
Zeile = 35 + (26 * c)
Wert = wks.Cells(Zeile, 6).Value
If Wert < 250 Then
With wks.Cells(Zeile, 7)
.Font.Bold = True
.Font.Color = RGB(255, 0, 0)
wks.Cells(Zeile, 7) = "< 250!"
End With
Else
With wks.Cells(Zeile, 7)
.Font.Bold = False
.Font.Color = RGB(0, 255, 0)
wks.Cells(Zeile, 7) = "> 250"
End With
End If
Next
End Sub</pre><p>
Jetzt habe ich eine umständliche Schleife gemacht, in der er sich die Zellen, wo die 250 sein soll (Spalte F,Zeile 35, 61, 87 usw. Diese Zellen sind mit einer Summenfunktion versehen und zählen die Einzelzählungen zusammen. Daneben soll dann die "Meldung" eingetragen werden. Egal, ob die Änderung also bei Zählung A oder B gemacht wird, überarbeitet er immer gleich alle. Und das dauert...

Anzeige
AW: Aktion bei Änderung in bestimmten Bereich
06.09.2007 22:55:00
Josef
Hallo Sascha,
dazu brauchst du doch kein Makro. Das geht ganz einfach über Bedingte Formatierung.
Tabelle2

 ABCDEFGH
8        
925       
1050       
1175       
12100       
13        
14        
15        
16        
17        
18        
19        
20        
21        
22        
23        
24        
25        
26        
27        
28        
29        
30        
31        
32        
33        
34        
35     250> 250 
36        
37        

Formeln der Tabelle
ZelleFormel
F35=SUMME(A1:A35)
G35=WENN(F35<250;"< ";"> ")&250

Bedingte Formatierungen der Tabelle
ZelleNr.: / BedingungFormat
G351. / Formel ist =F35>=250Abc
Excel Tabellen im Web darstellen  Excel Jeanie HTML
Gruß Sepp

Anzeige
AW: Aktion bei Änderung in bestimmten Bereich
06.09.2007 23:03:55
Sascha
Hatte ich auch erst dran gedacht, aber bedingte Formatierungen kann man nur drei festlegen, folglich auch nur für 3 Zellen. Ich brauch 10 =(.
Vielen Dank für die Hilfe!

AW: Aktion bei Änderung in bestimmten Bereich
06.09.2007 23:07:16
Sascha
AUTSCH!!!
Aber nicht, wenn ich jede Zelle einzeln anspreche... Dann hab ich bis zu drei bed. Formatierungen pro Zelle!!!
Tut schon manchmal weh... Danke!
Anzeige

Forumthreads zu verwandten Themen

Datei im bestimmten Pfad öffnen - mein Skript
Jürgen

Hallo Excel-Forum,
habe hier ein Skript um eine rtf-Datei zu öffnen. Möchte aber festlegen, dass sich sofort einebestimmter Pfad öffnet. In diesem Fall N:\Versand.
fFile = Application.GetOpenFilename("RTF-Dateien (*.rtf), *.rtf")
fPfad = "N:\Versand\"
With ActiveSheet.QueryTabl...
02.09.2008 12:01:00
Thread-ID: 1006720
4 Beiträge
Anzeige
Kästchengröße in cm
Rudi

Hallo Ihr Lieben,
wie kann ich die einzelnen Excel-Felder in cm-Größe einstellen?
Ich möchte Etiketten für kleine Plastikschachteln in der Größe 3,7 cm x 2 cm machen und dann beschriften. Müsste eigentlich in Excel so gehen, leider weiß ich nicht, wie mann die Excel Felder gleich in cm...
28.09.2008 11:11:00
Thread-ID: 1012896
8 Beiträge
Anzeige
Caption eines CommandButton im UserForm ändern
Lenhard

Moin Excellianer!
Ich habe ein UserForm mit einer TextBox1 und einem CommandBotton1.
Wenn in der TextBox1 kein Text steht, dann soll die Caption des CommandButton "ABC" anzeigen...
...und wenn in der TextBox1 Text steht, dann soll die Caption des CommandButton "XYZ" anzeigen.
Ge...
16.12.2008 22:01:00
Thread-ID: 1033444
3 Beiträge
Öffnen eines Diagrammtabellenblatt kyperlink/macro
moritz

Hallo Zusammen,
ich habe eine Datei und würde von dort gerne auf andere Dateien und weiter direkt auf versch. Diagrammtabellenblätter öffnen.
1.) kann mir jemand helfen wie das per hyperlink geht... wenn es geht.... weil ja der Zellbezug fehlt
2.) oder wie sieht das macro dafür aus?...
22.01.2009 10:59:00
Thread-ID: 1042493
2 Beiträge
Word Vba in Optionen ein Häkchen setzen/löschen
Reinhard

Hallo Wissende,
mit ActiveWindow.View.ShowFieldCodes = False kann man in Word das Häkchen bei
Extras--Optionen--Ansicht--Feldfunktionen entfernen.
Nun wollte ich mich aber der Sache so nähern:
MsgBox CommandBars("Menu Bar").Controls("E&xtras").Controls("&Optionen...").Ca...
29.01.2009 18:35:33
Thread-ID: 1045134
5 Beiträge
Excel fummelt selbstständig in den Optionen herum
Udo

Hallo zusammen !
Schon seit längerem nervt folgendes:
Unter Excel-Optionen-erweitert-beim scrollen mit intellimouse zoomen ist das Häckchen nicht gesetzt, weil ich die Angewohnheit mich mit dem Mittelrad meiner Maus durch Exceltabellen zu bewegen.
In unregelmäßigen Zeitabständen s...
16.03.2009 16:12:57
Thread-ID: 1060813
3 Beiträge
CommandButton -> Caption in Programm verwenden
Florian

Hallo,
ich habe nach langem mal wieder ein Problem auf dem Tisch liegen.
Ich habe eine Excel-Datei erstellt und 32 CommandButton's angelegt.
Klassisch lege ich jetzt für jeden CommandButton folgenden Private Sub an: Private Sub CommandButton01_Click() Workbooks.Open Filename:=Ar...
24.03.2009 09:55:53
Thread-ID: 1063177
7 Beiträge
Zeilen- und Spaltenbreite in cm
Hartwig

Hallo Leute,
ich habe untenstehendes Makro mal von einem guten Helfer im Forum bekommen.
Ich weiß aber nicht mehr von wem. Nun weichen die Ergebnisse aber von der Eingabe ab.
Wenn ich z.B. 3,00 cm Spaltenbreite eingebe, erhalte ich 2,80 cm, bei 3,00 cm Zeilenhöhe
erhalte ich 3,3...
29.04.2009 09:49:17
Thread-ID: 1071787
4 Beiträge
Diagramm und einzelen Zellen nach PPT kopieren
Mandy

Hallo,
ich habe eine Excelmappe mit Daten und Diagrammen. Meine Frage dazu, ist es möglich, mit einem Makro aus Excel heraus, Diagramme (Diagramm 1", "Diagramm 2") und / oder ein kopierter Range (zB A1 : D10)
in ein Powerpointdokument zu bringen ?
Ich stelle mir das so vor, dass nac...
02.10.2009 09:57:53
Thread-ID: 1106620
2 Beiträge
OptionButton7 aktiv dann Text X in Listbox1
Wolfgang

Hallo,
auf einer Multipage befinden sich u.a. Listboxes und OptionButton; Wie kann ich erreichen, dass, wenn OptionButton7 aktiviert wird, automatisch in Listbox1 der Text z.B. "Test3", der sich an dritter Stelle in der Listbox befindet, die wiederum aus einer Tabelle "gespeist" wird, angez...
24.10.2009 08:56:56
Thread-ID: 1111782
5 Beiträge
Seite skalieren auf 1 Seite (inkl. Diagramm)
MikeM

Hallo zusammen,
Ich hoffe, ihr könnt mir bei meinem kleinen Problem weiterhelfen. ich bekomme es einfach nicht hin.
Ich habe eine Tabelle und drunter ein Diagramm. Nun möchte ich das auf 1 Seite drucken.
Seite einrichten - auf 1 Seite anpassen funktioniert zwar, allerdings wird das...
04.12.2009 08:37:35
Thread-ID: 1121745
4 Beiträge
| HERBERS Excel Forum
Ilka

Hallo,
in Spalte A1 bis A1000 stehen Artikelnummern.
In C1, C2 und C3 werden Artikelnummern eingetragen, nach denen in Spalte A gesucht wird.
Werden diese gefunden, soll in B1 bis B1000 neben der gefundenen ArtikelNr in Spalte A eine 1 eingetragen werden, im anderen Fall sollen die...
06.12.2009 16:32:34
Thread-ID: 1122075
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige