Das Clever-Excel-Forum.de - Treffen
findet vom 15. - 17. September 2017 in Thüringen / Region Großer Inselsberg statt. Hotelbuchung ab sofort möglich.


Bereichsfestlegung als Variable aufrufen
#1
Hi,

wie kann ich diese Bereichsfestlegung als Variable ausführen? Damit ich es an der zweiten und anderen Stellen aufrufen kann und nur an einer Position anpassen muß.

Code:
[...]
   ' Anpassen an maximal benutzten Bereich über alle Übersichten!
   SW = Range("L7:HR32").Cells.Count               ' Gesamtlaufzeit festlegen über Zählbereich
[...]
   ' Bereich analog oben anpassen!
   For Each Zelle In Range("L7:HR32")           ' Tabellenbereich, der überprüft wird.
[...]
Gruß Ralf

?mage

Die deutsche Rechtschreibung ist Freeware, d.h. du kannst sie kostenlos nutzen.
Allerdings ist sie nicht Open Source, deswegen darfst du sie nicht verändern oder in veränderter Form veröffentlichen.
to top
#2
Hallo Ralf

Als VBA-Doofie würde ich es so versuchen:
Code:
Dim MeinBereich As Range
Set MeinBereich = "A5:J17"
Wir sehen uns!
... shift-del
Eine Mustertabelle hilft beim Helfen.
Excel Super-Funktionen: VERWEIS(), INDEX(), WAHL()
to top
#3
Hallo Ralf,

ich weiß jetzt nicht ob ich Dich richtig verstanden habe...

Code:
Sub nn()
Dim myRange As Range
Set myRange = Range("L7:HR32")
'[...]
    ' Anpassen an maximal benutzten Bereich über alle Übersichten!
    SW = myRange.Cells.Count               ' Gesamtlaufzeit festlegen über Zählbereich
'[...]
    ' Bereich analog oben anpassen!
    For Each Zelle In myRange           ' Tabellenbereich, der überprüft wird.
    Next
'[...]
End Sub
lg Chris
Feedback nicht vergessen.
3a2920576572206973742064656e20646120736f206e65756769657269672e
 ?mage

to top
#4
Hallo Chris,

(16.05.2014, 07:47)chris-ka schrieb: ich weiß jetzt nicht ob ich Dich richtig verstanden habe...

ja, richtig verstanden, das könnte es sein.
Ich hatte heute nacht gedacht, das auch so versucht zu haben, da kam aber eine Fehlermeldung.
Gruß Ralf

?mage

Die deutsche Rechtschreibung ist Freeware, d.h. du kannst sie kostenlos nutzen.
Allerdings ist sie nicht Open Source, deswegen darfst du sie nicht verändern oder in veränderter Form veröffentlichen.
to top
#5
Hallo zusammen,

wenn man es kurz schreiben will - siehe Stefans Antwort, dann mit den eckigen Klammern:
Dim MeinBereich As Range
Set MeinBereich = [A5:J17]
   \\\|///      Hoffe, geholfen zu haben.
   ( ô ô )      Grüße, André aus G in T  
 ooO-(_)-Ooo    (Excel 97-2016)
to top
#6
Hallo André

Zitat:siehe Stefans Antwort
Der Stefan heißt aber Detlef.
Immerhin drei Buchstaben Übereinstimmung. 21
Wir sehen uns!
... shift-del
Eine Mustertabelle hilft beim Helfen.
Excel Super-Funktionen: VERWEIS(), INDEX(), WAHL()
to top
#7
Hallo Detlef,

ich hatte irgendwo noch Steffl im Hinterkopf Undecided (oder zumindest dessen Nickname)
   \\\|///      Hoffe, geholfen zu haben.
   ( ô ô )      Grüße, André aus G in T  
 ooO-(_)-Ooo    (Excel 97-2016)
to top
#8
(17.05.2014, 05:27)schauan schrieb: wenn man es kurz schreiben will - siehe Stefans Antwort, dann mit den eckigen Klammern:
Dim MeinBereich As Range
Set MeinBereich = [A5:J17]

aaah, ok, dann ist das klar, warum bei Verwendung der runden Klammern plötzlich nichts mehr gezählt wurde.

Jetzt habe ich es mit eckigen getestet, das funktioniert mit den Übersichten 2-5, aber bei der ersten findet Excel keine Farben, da werden nur Nullen eingetragen.
Gruß Ralf

?mage

Die deutsche Rechtschreibung ist Freeware, d.h. du kannst sie kostenlos nutzen.
Allerdings ist sie nicht Open Source, deswegen darfst du sie nicht verändern oder in veränderter Form veröffentlichen.
to top


Möglicherweise verwandte Themen...
Thema Verfasser Antworten Ansichten Letzter Beitrag
  MsgBox 1 Minute nach Dateiöffnung aufrufen nixdaacher 2 65 25.11.2016, 22:18
Letzter Beitrag: schauan
  VBA Solver mit zusätzlicher Variable und Zielwert eränzen tschibolli 2 72 22.11.2016, 08:11
Letzter Beitrag: tschibolli
  Variable in Makro VaterBaum 12 163 12.11.2016, 20:34
Letzter Beitrag: AlterDresdner
  Inhalt Multiselect-ListBox in Variable auslesen Rabe 3 77 28.10.2016, 12:04
Letzter Beitrag: Rabe
  Variable Nachtzeiten und Zuschläge Chimera 2 108 28.10.2016, 00:28
Letzter Beitrag: Chimera
  Zellenformeln verkürzen durch Namen definieren (variable) Woofer 2 97 27.10.2016, 15:46
Letzter Beitrag: BoskoBiati
Question Variable Höhe /Breite eines Excel VBA-UserForms GuteFrage 2 149 25.09.2016, 11:04
Letzter Beitrag: schauan
  Formelsuche: "Textwert" und variable Zahl frylich 22 721 02.09.2016, 13:45
Letzter Beitrag: Peter
  Variable wird nicht übergeben IchBinIch 4 192 08.08.2016, 18:47
Letzter Beitrag: IchBinIch
  Userform mit Buttons aufrufen und beenden Rabe 5 324 02.08.2016, 08:56
Letzter Beitrag: Rabe

Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste