Thema Datum  Von Nutzer Rating
Antwort
12.09.2019 12:02:33 PM3
NotSolved
12.09.2019 12:36:50 Torsten
NotSolved
12.09.2019 13:15:39 PM3
NotSolved
Blau Zellenbezug durch Inputfenester herstellen/Abfrage Spaltenwert
12.09.2019 13:25:47 Torsten
NotSolved
12.09.2019 14:05:35 PM3
Solved
12.09.2019 15:00:21 Torsten
Solved

Ansicht des Beitrags:
Von:
Torsten
Datum:
12.09.2019 13:25:47
Views:
361
Rating: Antwort:
  Ja
Thema:
Zellenbezug durch Inputfenester herstellen/Abfrage Spaltenwert

Da hast du natuerlich recht. Wenn es nur um eine Zelle ginge, brauchte man keine Schleife.

Sub testinput()

Dim eingabe As String, Adr As String, SpaBu As String
Dim Zellen As Range

eingabe = InputBox("Bitte geben Sie die Zeile des neuen Titels ein", "Abfrage Zeile", "94")

For Each Zellen In Selection
    Adr = Zellen.Address()
    SpaBu = Mid(Adr, 2, InStr(2, Adr, "$") - 2)
    Zellen.Formula = "=" & SpaBu & eingabe
Next Zellen

End Sub

Gruss Torsten


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
12.09.2019 12:02:33 PM3
NotSolved
12.09.2019 12:36:50 Torsten
NotSolved
12.09.2019 13:15:39 PM3
NotSolved
Blau Zellenbezug durch Inputfenester herstellen/Abfrage Spaltenwert
12.09.2019 13:25:47 Torsten
NotSolved
12.09.2019 14:05:35 PM3
Solved
12.09.2019 15:00:21 Torsten
Solved