Thema Datum  Von Nutzer Rating
Antwort
22.12.2022 10:23:32 Axel
NotSolved
22.12.2022 12:03:13 t
NotSolved
22.12.2022 12:53:11 Gast58357
NotSolved
22.12.2022 13:40:01 t
NotSolved
22.12.2022 13:47:49 Axel
NotSolved
Blau RANGE: Zellwerte übergeben
22.12.2022 14:11:51 Der Steuerfuzzi
NotSolved
22.12.2022 14:22:23 Axel
NotSolved
22.12.2022 15:03:24 Der Steuerfuzzi
NotSolved
22.12.2022 15:05:18 Der Steuerfuzzi
NotSolved
23.12.2022 09:12:47 Axel
NotSolved
23.12.2022 09:18:27 Der Steuerfuzzi
NotSolved

Ansicht des Beitrags:
Von:
Der Steuerfuzzi
Datum:
22.12.2022 14:11:51
Views:
494
Rating: Antwort:
  Ja
Thema:
RANGE: Zellwerte übergeben

Hallo,

 

die eckigen Klammern sind eine Kurzform für Evaluate. Alles was in den Klammern steht wird mittels Evaluate ausgewertet. [B2] wäre dann die Range B2. Das ganze geht bei der Kurzform nicht mit Variablen. Es gehen zB folgende Dinge:

 

Sub Makro1()
'
Dim Zelleeins As Variant
Zelleeins = "A2"

Dim Zellezwei As Variant
Zellezwei = "A3"

Zelleeins = InputBox(" Zelle 1 die formatiert werden soll ")
Debug.Print Application.Evaluate(Zelleeins)
Debug.Print Range(Zelleeins).Value
With Tabelle1.Range(Zelleeins, Zellezwei).Interior
        .Pattern = xlSolid
        .PatternColorIndex = xlAutomatic
        .Color = 65735
        .TintAndShade = 0
        .PatternTintAndShade = 0
End With
  
End Sub

Auf "Select" sollte man am besten verzichten ... es ist in 99,9% der Fälle nicht notwendig mit Select zu arbeiten:

https://www.denisreis.com/excel-vba-bessere-performance-ohne-select/

https://dasdev.de/wie-man-die-verwendung-von-select-in-excel-vba-vermeidet/

 

Gruß

Michael

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
22.12.2022 10:23:32 Axel
NotSolved
22.12.2022 12:03:13 t
NotSolved
22.12.2022 12:53:11 Gast58357
NotSolved
22.12.2022 13:40:01 t
NotSolved
22.12.2022 13:47:49 Axel
NotSolved
Blau RANGE: Zellwerte übergeben
22.12.2022 14:11:51 Der Steuerfuzzi
NotSolved
22.12.2022 14:22:23 Axel
NotSolved
22.12.2022 15:03:24 Der Steuerfuzzi
NotSolved
22.12.2022 15:05:18 Der Steuerfuzzi
NotSolved
23.12.2022 09:12:47 Axel
NotSolved
23.12.2022 09:18:27 Der Steuerfuzzi
NotSolved