Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 17:19:09
Formel mit Index-Funktion
24.04.2024 16:19:42
SummeWenn / SummeWenns mit Bedingung wenn kleiner als dann
24.04.2024 14:48:50
"Eingabefeld" zwischen zwei Zeilen geht nicht weg.
24.04.2024 14:40:10
Zeilenumbrüche in Textbox zählen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1124to1128
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
1124to1128
1124to1128
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Inputbox (Type 8), gewählten Bereich ausgeben.

Inputbox (Type 8), gewählten Bereich ausgeben.
Luu
Hallo Excel Freunde!
Ich habe folgenden Code:
Dim Bereich As Range
Set Bereich = Application.InputBox(prompt:="Bereich eingeben oder mit Maus auswählen", Type:=8)
Wie lasse ich mir nun den ausgewählten Bereich in einer Zelle als Text ausgeben?
Sheets("Admin").Range("I6") = Bereich
wäre zu einfach und funktioniert ja auch nicht.
Schonmal im Voraus vielen Dank für die Hilfe.
Gruß
Luu

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

Betreff
Benutzer
Anzeige
AW: Inputbox (Type 8), gewählten Bereich ausgeben.
16.12.2009 10:53:08
Hajo_Zi
Hallo luu,
Option Explicit
Sub Luu()
Dim Bereich As Range
Set Bereich = Application.InputBox(prompt:="Bereich eingeben oder mit Maus auswählen", Type: _
=8)
ActiveSheet.Range("I6") = Bereich.Address
End Sub

AW: Inputbox (Type 8), gewählten Bereich ausgeben.
16.12.2009 11:00:04
Luu
Hallo Hajo!
Danke, war ja irgendwie einfach... Eine kleine Sache noch, wenn ich den Bereich auf einem anderen Blatt auswähle, schreibt er mir das Blatt jedoch nicht auf.
In der Inputbox steht unten ja der Bereich. Z.B. Testseite!$B$18:$G$316.
Kannst du mir da auch noch weiterhelfen?
Anzeige
AW: Inputbox (Type 8), gewählten Bereich ausgeben.
16.12.2009 11:19:34
Luu
ok, erledigt.
bisschen kompliziert, aber es geht.
Sheets("Admin").Range("I9") = Right(Bereich.Address(External:=True), Len(Bereich.Address(External:=True)) - Len(ActiveWorkbook.Name) - 2)
Bereich.Address(External:=True) gibt die adresse mit workbook und sheet wieder. um das workbook wegzukriegen, hab ich den rest drumrum gebastelt.
gruß
luu
AW: Inputbox (Type 8), gewählten Bereich ausgeben.
16.12.2009 11:30:41
Hajo_Zi
Hallo luu,
Option Explicit
Sub Luu()
Dim Bereich As Range
Set Bereich = Application.InputBox(prompt:="Bereich eingeben oder mit Maus auswählen", Type: _
=8)
ActiveSheet.Range("I6") = Bereich.Parent.Name & "!" & Bereich.Address
End Sub
Gruß Hajo
Anzeige
AW: Inputbox (Type 8), gewählten Bereich ausgeben.
16.12.2009 11:57:38
Luu
Viele Wege führen nach Rom, deiner mit Abkürzung.
Danke

48 Forumthreads zu ähnlichen Themen

runden per VBA - Typen unverträglich???
David

Hallo zusammen,
der "Einzeiler"
Sub runden() With Range("A1:A2") .Value = Round(.Value, 2) End With End Sub
liefert bei mir den Laufzeitfehler 13 - Typen unverträglich.
Mit einer einzelnen Zelle ("A1") funzt es. Was mache ich falsch?
Gruß
David
28.10.2008 15:05:00
Thread-ID: 1019971
5 Beiträge
Anzeige
Inputbox für VBA Befehl
Tom

Hallo,
ich habe folgenden Code und brauche eine Inputbox, die die Eingabe in den VBA Code integriert.
Vorerst mal der Code:
'Auszulesende Dateien Else ' B = 0 If sArea2(B) "" Then ThisWorkbook.Sheets(OName).Cells(LCol, 1) = OName 'schreibe Ordnername sFormel = Right$(sArea2(B), L...
05.01.2009 15:21:00
Thread-ID: 1036995
9 Beiträge
VBA-Match: "<vorheriger" - Typen unverträglich?
MBorn

Jutn Abnd,
weiß vielleicht einer oder eine von Euch, warum bei folgendem Versuch mit
Application.Match immer die Fehlermeldung "Typen unverträglich" auftaucht?
<vorheriger steht in Excels Zelle A16 und ist eine Textzelle.
~f~
Vorheriger = Application.Match("<vo...
24.01.2009 20:32:36
Thread-ID: 1043448
8 Beiträge
Anzeige
Inputbox VBA Fehler
Leitz

Hallo!
Habe ein kleines Problem!
Habe eine Inputbox in die eine Zahl geschrieben werden soll; definiert als String (strInput as String)
Für Berechnungen übergebe ich den Wert in einen Integer Speicher (intInput = strInput)
Wenn nun versehentlich ein Buchstabe in die Inputbox ges...
25.02.2009 20:14:03
Thread-ID: 1054157
18 Beiträge
VBA - Hilfetexte für Funktionen wie MsgBox, InputB
Stefan

Hallo zusammen,
gibt es eine einfache Möglichkeit, in VBA Hilfetexte (welche ruhig einfachen Textfiles o.ä. entsprechen können) für Funktionen wie MsgBox, InputBox etc. zu hinterlegen?
Danke vorab und Gruß.
Stefan
12.06.2009 09:41:53
Thread-ID: 1080899
2 Beiträge
VBA verschiedene Zellen auswählen und ausgeben
Roger

Hallo zusammen
Ich hab folgenden VBA Code um Daten von Excel in Word auszugeben, das funktioniert einwandfrei. Nun möchte ich den aber so abändern das er mir nur die Zellen M7, N24 und P7, Q24 und S7, T24 in Word ausgibt. Was muss ich da abändern?
Private Sub CommandButton1_Click() Dim...
23.07.2009 18:29:31
Thread-ID: 1090473
4 Beiträge
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
Makro: Buttonklick = Blatt u. Zelle auswählen
tuska

Hallo,
ich habe mit dem Makrorecorder Code aufgezeichnet und in Tabelle 1 einen Button angelegt.
Den Button habe ich mit dem Code Private Sub CommandButton1_Click() Sheets("Tabelle2").Select Range("E6").Select End Sub
belegt, jedoch erhalte ich zu Range("E6").Select immer eine Feh...
09.07.2010 21:56:49
Thread-ID: 1166414
5 Beiträge
Anzeige

Links zu Excel-Dialogen

InputBox

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
3
8
7
1
17
1
3
3
4
4
3
4
12
3
6
5
2
3
5
3
9
2
6
13