Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
26.04.2024 16:05:28
PivotChart-Stapeldiagramm erstellen
26.04.2024 15:34:42
Überlagernde Textbox-Ansicht
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
656to660
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
656to660
656to660
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

zu großes Makro, wie bekomme ich das kleiner?

zu großes Makro, wie bekomme ich das kleiner?
28.08.2005 11:59:06
wuntschi
Hallo an alle,
da ich noch ein Neuling bin beim VBA,
das aber ändern möchte, folgende Frage.
Ich habe hier ein Problem gelöst der Code ist aber sehr groß geworden.
Ausserdem muß ich Werte für eine kurze Zeit auf einem Tabellenblatt zwischen speichern und dann wieder löschen, um sie in einem anderen Modul wieder zu benutzen.
Wer kann dieses Makro kleiner schreiben und mir das auch noch erklären?
https://www.herber.de/bbs/user/26102.xls
Vielen Dank!
Gruß
Wuntschi

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: zu großes Makro, wie bekomme ich das kleiner?
28.08.2005 12:17:51
Matthias
Hallo Wuntschi,
du solltest dich mal mit Array-Variablen beschäftigen.
z.B. kann der erste Teil der Prozedur Daten_erstellen_IP2 so erledigt werden:

Dim IPCB(33 To 100) As Boolean
Dim i As Integer
For i = 33 To 100
IPCB(i) = Worksheets("Coordinates").Cells(200 + i, 200).Value
Next i

Dass jetzt mehr Daten eingelesen werden als benötigt (z.B. fehlen bei dir 34-49), kannst du hinnehmen oder durch eine If-Abfrage lenken.
Gruß Matthias
AW: zu großes Makro, wie bekomme ich das kleiner?
28.08.2005 12:23:51
wuntschi
Hallo Matthias,
danke für den Tip,
ich werde mich damit befassen.
Hallo an alle,
wer noch andere Tips für mich hat nur zu!
Danke!
gruß
wuntschi
Anzeige
AW: zu großes Makro, wie bekomme ich das kleiner?
28.08.2005 13:09:48
Uduuh
Hallo,
sowas kannst du auch kürzen:
If IPCB1 = True Then
Pitch = IPCBB2
CName = "A1_s"
XValue = 0
YValue = 0
Worksheets("Coordinates").Cells(e, 2).Value = CName
Worksheets("Coordinates").Cells(e, 4).Value = XValue
Worksheets("Coordinates").Cells(e, 5).Value = YValue
e = e + 1
End If
If IPCB1 = True Then
Pitch = IPCBB2
CName = "A1_s"
XValue = 0
YValue = 0
With Worksheets("Coordinates")
.Cells(e, 2)= CName
.Cells(e, 4)= XValue
.Cells(e, 5)= YValue
End With
e = e + 1
End If
Gruß aus’m Pott
Udo

Anzeige

301 Forumthreads zu ähnlichen Themen

Wie bau ich den Code ein?
Baywatch

Hi
Habe unten schon einen Tread aufgemacht, wo es ums drucken geht und es gibt auhc jemanden der mir eine super ANtwort gegeben hat, nur leider weiß ich jetzt nicht, wei ich dies in mein Programm einbauen soll, kann mir ja jemand bei helfen?
https://www.herber.de/bbs/user/54811.xls
22.08.2008 13:44:00
Thread-ID: 1003844
5 Beiträge
Anzeige
Wie kann ich hier eine Schleife ...
Thomas

Hi Profis,
Wie kann ich hier eine Schleife einbauen sodas das Passwort nur einmal eingegeben wird und die Tabelle somit für einen Zeitraum von ca 60minuten freigeben wird. Den Code hab ich hier aus dem Archiv und an meine Bedürfnisse mit basteln angepasst. Er überwacht einen Zellbereich und...
02.02.2009 11:29:00
Thread-ID: 1046127
9 Beiträge
Webabfrage gibt Hyperlink nicht wieder
MBorn

Hallo,
auf der Seite von Wikipedia für Aston Villa http://de.wikipedia.org/wiki/Aston_Villa
gibt es einen Link zum Stadion dieser Fußballmannschaft.
Bei einer Excel-Webabfrage wird dieser Link nicht importiert. Trotz xlWebFormattingAll.
Weiß jemand, warum das so ist oder wie da...
09.02.2009 11:18:00
Thread-ID: 1048594
5 Beiträge
Anzeige
Wie Unterverzeichnisse einlesen
Mindjogger

Servus,
um mein Problem weiter herunterzubrechen moechte ich aus einem bekannten Verzeichnis die Datei index.html aus allen Unterverzeichnisssen einlesen.
Nur, wie starte ich das Filemodul um auf Verzeichnisse bzw. Dateien zuzugreifen?
So geht es nicht:
Private Function GetAO...
30.03.2009 17:39:40
Thread-ID: 1065364
6 Beiträge
Wie index.html aus allen Unterverzeichnissen einle
Mindjogger

Servus,
ich verzweifle an diesem Prlem bald. Ich moechte einfach in einem bekannten Verzeichnis durch alle Unterverzeichnise gehen und die dort leigende index.html einlesen.
Aber wie greife ich auf die Verzeichnisse zu bzw. wie bastle ich mir darum eine Schleife?
Ich habe nur die al...
01.04.2009 14:14:33
Thread-ID: 1066000
2 Beiträge
einzelne Zellen nicht schützen, wie?
dietmar

Hallo,
ich möchte bei einem EXCEL-Formular, dass man nur einzelne Zellen befüllen kann und der Rest des Formulars gesperrt ist. Die auszufüllenden Zellen (z.B. Name, Adresse, usw.) sollten durch Tab angewählt werden können. Zur Zeit kann ich nur einzelne Zellen sperren aber nicht umgekehrt?...
05.04.2009 22:41:32
Thread-ID: 1066974
6 Beiträge
Dateneingeben, Wegspeichern und wieder eingeben
Peter_weber

Liebes Forum,
bin blutiger aber lernwilliger VBA Anfänger.
Wahrscheinlich ist meine Frage schon Tausend mal gestellt worden und wird von den Experten mit einem wohlwollendem Lächeln begleitet.
Also, ich benötige Eure Unterstützung. Wie könnte ein einfaches VBA Progrämchen für mein...
09.04.2009 09:39:18
Thread-ID: 1067898
7 Beiträge
zahleneingabe tut nicht so wie sie soll
christoph

das eingeben von mehrstelligen zahlen funktioniert bei mir nicht.
wenn ich zahlen von 0-9 eingebe, werden diese korrekt angezeigt bzw berechnet. von 10-999 ersetzt sich der wert mit 0 oder 1. ab 1000 wird der wert nur dann korrekt dargestellt bzw berechnet, wenn ich ihn so eingebe: 1.000
13.07.2009 00:48:50
Thread-ID: 1088088
12 Beiträge

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
4
8
8
4
2
5
1
5
6
11
4
8
2
3
5
2
3
9
10
4
2
3
5
3
5