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

Beginn Auswahl mit Inputbox - Ende automatisch

Forumthread: Beginn Auswahl mit Inputbox - Ende automatisch

Beginn Auswahl mit Inputbox - Ende automatisch
23.01.2007 12:12:27
Erwin
Hallo zusammen,
ich möchte in einer Tabelle einen bestimmten Bereich markieren.
Der Beginn soll über Inputbox geschehen, um dort z. B. B3 eingeben zu können.
Das Ende der Tabelle (letzte belegte Zelle) soll automatisch ermittelt werden
( ich hab mal was gefunden: ...SpecialCells(xlLastCell)).Select...).
Der Bereich von z. B. B3 bis H15 soll dann markiert werden.
Den Rest habe ich mit dem Recorder aufgezeichnet.
Wer kann bitte helfen?
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Beginn Auswahl mit Inputbox - Ende automatisch
23.01.2007 12:44:55
Harald
Hallo Erwin,
hier mein Vorschlag

Sub test()
Dim startzelle As String, endzelle As String
On Error GoTo ende
startzelle = InputBox("Ab welcher Zelle soll markiert werden ?")
endzelle = UsedRange.SpecialCells(xlCellTypeLastCell).Address(0, 0)
If startzelle <> "" Then Range(startzelle & ":" & endzelle).Select
'restlicher Code
ende:
If Err.Number > 0 Then MsgBox "Abbruch wegen" & Chr(10) & Err.Description
End Sub

Gruss Harald
Anzeige
AW: Beginn Auswahl mit Inputbox - Ende automatisch
23.01.2007 13:22:06
Erwin
Hallo Harald,
danke für die Hilfe, aber so ganz klappt's bei mir nicht:

Sub test()
Dim startzelle As String, endzelle As String
'On Error GoTo ende
startzelle = InputBox("Ab welcher Zelle soll markiert werden ?")
endzelle = UsedRange.SpecialCells(xlCellTypeLastCell).Address(0, 0)
hier kommt der Debugger und gibt aus: Objekt erforderlich - markiert wird nichts
If startzelle <> "" Then Range(startzelle & ":" & endzelle).Select
'restlicher Code
'ende:
'If Err.Number > 0 Then MsgBox "Abbruch wegen" & Chr(10) & Err.Description
End Sub

Wo liegt der Fehler?
Grüße Erwin
Anzeige
AW: Beginn Auswahl mit Inputbox - Ende automatisch
23.01.2007 13:29:18
Harald
Hi,
gründliches Reiben an meiner Glaskugel, brachte folgende Vermutung.
;-))
Blattschutz noch drin ?
Falls ja, zu Anfang des Codes
activesheet.unprotect "deinpasswort"
Gruss Harald
AW: Beginn Auswahl mit Inputbox - Ende automatisch
23.01.2007 14:00:17
Erwin
Hallo Harald,
sorry, aber es gibt keinen Blattschutz.
Welches Objekt muss denn vorhanden sein?
Ich habe keine Ahnung.
Grüße Erwin
Anzeige
AW: Beginn Auswahl mit Inputbox - Ende automatisch
23.01.2007 14:13:10
Harald
Hi,
das benötigte Objekt ist offensichtlich die Variable endzelle.
Und keine Ahnung ist ein gutes Stichwort.
Ich hab nämlich keine Ahnung, welche Besonderheiten dieses Blatt oder die Mappe zu bieten hat (Ereigniscodes etc.).
Der Code hab ich in einer normalen Mustertabelle problemlos getestet.
So...ich hab nun aber Feierabend und kann erst morgen wieder.
Ggf. kannste die Mappe als Muster mal hochladen.
Gruss Harald
Anzeige
;

Forumthreads zu verwandten Themen

VBA InputBox
Einzel

Hallo,
habe folgenden CODE
Sub Bemerkung() Dim Eingabe As String Dim erg% Text = InputBox("Bitte geben Sie einen Wert für ein:", "Dateneingabe:") Range("B6").Value = Text End Sub
Nun möchte ich aber, das wenn in z.B. B6 schon was steht er den Inhalt in z.B. B7 einträgt. usw.
...
18.06.2009 14:21:23
Thread-ID: 1082593
3 Beiträge
Anzeige
VBA Inputbox Type Parameter Problem
Bernhard

Liebes Forum,
bislang (Excel 2003) war es möglich eine Variable aus einer Inputbox auszulesen und mit Type:=0 konnte man außerhalb der Inputbox auf eine Zelle klicken - die Zelladresse wurde dann in die Inputbox übernommen und konnte ausgewertet werden.
Beispiel:
str_cell_input =...
20.01.2010 15:00:09
Thread-ID: 1131397
4 Beiträge
VBA Datum in INPUTBOX in Tabelle suchen
Klaus

Nachdem ich nun seit einigen Stunden das Forum durchforstet habe, gehen mir langsam die Suchbegriffe aus. Daher frag ich jetzt einfach einmal......
Ich habe (mal wieder) so eine Tabelle mit einer Zinsstaffel. In Spalte B steht immer die Valuta oder eben das Buchungsdatum.
Ich hab mir be...
22.04.2010 16:03:34
Thread-ID: 1153334
2 Beiträge
Mit Inputbox große Datentabelle durchsuchen VBA
Ralf

Hallo.
Ich habe ein Problem und komme einfach nicht weiter. Vllt kann mir jmd hier helfen.
Ich habe ein großes Worksheet mit 7 Spalten (von Spalte A bis Spalte G) und ca 11200 Zeilen. Die Überschriften der einzelnen Spalten sind jeweils von Zeile 3 bis Zeile 5 (Verbunden). Zeile 1 und...
21.06.2013 11:31:13
Thread-ID: 1318908
5 Beiträge
Anzeige
VBA Wert aus DropDown Listen in anderem Feld
Tobias

Hallo,
für folgende Funktion komme ich nicht zur richtigen Lösung:
Ich habe in den Zellen C1, C2, C3, C4, C5 jeweils eine Auswahlliste. Nun Soll wenn ein Wert in C1 vorhanden ist, dieser in E1 angezeigt werden. Soweit so gut :-)
Wenn nun aber ein Wert in C1 und C2 steht, soll der We...
28.11.2013 11:48:47
Thread-ID: 1340365
5 Beiträge
VBA via Inputbox suchen und Zelle ändern
Ralf
Hallo zusammen,
habe folgendes Problem:
Würde gerne über eine Inputbox nach einem Wert in Spalte B suchen. Wenn der Wert gefunden wurde, soll über eine weitere Inputbox der Wert in der Spalte G (in der selben Zeile) geändert werden können.
Bsp:
Suchwert "1234" wird gefunden in Zell...
22.06.2014 16:14:54
Thread-ID: 1366900
5 Beiträge
Dropdown Auswahl mit Makro/VBA Verknüpfung
Fred

Hallo zusammen
Mein Problem ist folgendes:
Die Kalkulationstabelle soll im Feld Stellplätze je nach Dropdown Auswahl in Spalte C verschiedene Ausführungen durchführen.
Wird einer der 4 Fefco Typen (0200, 0201, 0203, 0452) ausgewählt, soll die Anzahl der Stellplätze anhand der Formel...
18.09.2014 11:14:26
Thread-ID: 1382264
3 Beiträge
Dropdown Auswahl mit Makro/VBA Verknüpfung
Fred

Hallo zusammen
Mein Problem ist folgendes:
Die Kalkulationstabelle soll im Feld Stellplätze je nach Dropdown Auswahl in Spalte C verschiedene Ausführungen durchführen.
Wird einer der 4 Fefco Typen (0200, 0201, 0203, 0452) ausgewählt, soll die Anzahl der Stellplätze anhand der Formel...
18.09.2014 11:30:26
Thread-ID: 1382275
7 Beiträge
Dropdown mit VBA bitte helft mir
Hallo,
Ich bin leider vollkommener Neuling im Umgang mit VBA und bräuchte mal eure Hilfe...
Also folgendes: In meiner einen Arbeitsmappe (Mappe 1) befindet sich eine Tabelle mit Textwerten. Die Spalte ist fest (Spalte C), jedoch kann sich die Anzahl der Zeilen verändern, wo die Liste steht....
17.08.2015 11:03:15
Thread-ID: 1442662
7 Beiträge
VBA-Userform: Gestaffelte Dropdown Liste
Jendrik

Hallo zusammen,
ich bin gerade dabei mir ein Excel Tool zu basteln, mit dem es möglich sein soll, den Gesamt Status von Projekten zu überblicken.
Hinter diesem Link findet ihr einen beispielhaften Aufbau: https://www.herber.de/bbs/user/100475.xlsx
Der Aufbau kurz erklärt:
Es gib...
29.09.2015 13:58:53
Thread-ID: 1449947
2 Beiträge
Anzeige
per VBA InputBox in Zelle schreiben und drucken
Dominic

Hallo zusammen,
ich benötige ein Skript bei dem ich einen Wert eingeben kann (1 bis 52) z. B. per InputBox. Dieser Wert wird in meine Tabelle in die Zelle C6 bis C12 übergeben.
Wie bekomme ich das hin? Mein folgendes Skript funktioniert nicht. Hier kommt immer der Fehler "Objekt erforde...
03.05.2016 11:02:25
Thread-ID: 1491626
4 Beiträge
Suchen /Ersetzen VBA /InputBox
Mike

Hallo,
Werner war so hilfreich und hat mir bei diesen Code weitergeholfen.
Folgendes möchte ich noch verbesserrn :
Wenn ich die Zahl eingegeben habe Bsp. Artikelnummer fragt er zum gleichen Artikel diese nochmal ab, ist es möglich das nur eine Eingabe erforderlich ist. In der Spal...
06.02.2017 21:10:58
Thread-ID: 1539889
9 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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