Collapse column

Autor Thema: Office 2013: Bereich nach Zahl durchsuchen und anderes Feld ausgeben  (Gelesen 1671 mal)

Offline roschu

  • Newbie
  • *
  • Beiträge: 2
    • Profil anzeigen
  • Office-KnowHow: Fortgeschritten
  • VBA-KnowHow- : Mittelmäßig
  • Version [Office] : Office 2013
Office 2013: Bereich nach Zahl durchsuchen und anderes Feld ausgeben
« am: Dezember 31, 2015, 11:48:49 Vormittag »
Hallo,

ich möchte gerne einen Bereich in Excel nach der Zahl "1" durchsuchen. In dem Bereich kommt diese Zahl nur 1x vor, der Rest der Zellen ist komplett leer. Wenn die Zahl gefunden wurde, soll ein Wert (bzw. ein Text) ausgegeben werden, der sich in einer anderen Zeile, jedoch der gleichen Spalte wie die "1" befindet.
Als Beispiel habe ich ein Bild angehängt. Der markierte Bereich D3:J6 soll nach der "1" durchsucht werden. Ausgegeben werden soll dann (z.B. in A1) das rot markierte Feld "rel", welches sich in der gleichen Spalte wie "1" befindet. Ein anderes Beispiel: Wenn die 1 in bspw. "I5" steht, soll "ku" ausgegeben werden. Der auszugebende Text befindet sich demnach immer in Zeile 2.


Kann mir da jemand weiterhelfen?

Viele Grüße
roschu

Keine Lösung gefunden? Du kannst Dich gerne an unser erfahrenes Experten-Team wenden und Dein Anliegen in Auftrag geben.
>>> Schnell und einfach ein unverbindliches Angebot anfordern. Per E-Mail an anfrage@excel-inside.de oder per Online-Formular
<<<

!!! Wichtige Information
!!! Dieses Forum steht aus technischen Gründen ab dem 11. September 2019 nur noch im Lesemodus zur Verfügung.
Das NEUE Office-Fragen-Forum kannst du aber unter der gewohnten Domain https://office-fragen.de wie gewohnt nutzen.

- Wir freuen uns auf deinen Besuch im neuen Forum.

Offline gmg-cc

  • Hero Member
  • *****
  • Beiträge: 1.321
    • Profil anzeigen
    • Meine Webseite
  • Office-KnowHow: Fortgeschritten
  • VBA-KnowHow- : Gut
  • Version [Office] : Office 2016
Antw:Office 2013: Bereich nach Zahl durchsuchen und anderes Feld ausgeben
« Antwort #1 am: Dezember 31, 2015, 12:10:56 Nachmittag »
Moin,

es geht vielleicht (wahrscheinlich) auch mit einer Formel; ich ziehe eine übersichtliche VBA-Prozedur vor  ;)

Sub GMG_CC()
   Cells(1, 1) = Cells(2, Selection.Find(1).Column)
End Sub
Gruß
Günther

Offline DL

  • Hero Member
  • *****
  • Beiträge: 808
  • {Irrtum / Versuch * Glaskugel}
    • Profil anzeigen
  • Office-KnowHow: Fortgeschritten
  • VBA-KnowHow- : Mittelmäßig
  • Version [Office] : Office 2016
Antw:Office 2013: Bereich nach Zahl durchsuchen und anderes Feld ausgeben
« Antwort #2 am: Dezember 31, 2015, 12:31:50 Nachmittag »
Hallo Günther

Was heißt "vielleicht"?  :D
{=VERWEIS(42;1/MMULT(MTRANS(ZEILE(1:4)^0);(D3:J6=1)*(SPALTE(D3:J6)));D2:J2)}
Wir sehen uns!
... Detlef
Eine Mustertabelle hilft beim Helfen.
Excel Super-Funktionen: VERWEIS(), INDEX(), WAHL()

Offline gmg-cc

  • Hero Member
  • *****
  • Beiträge: 1.321
    • Profil anzeigen
    • Meine Webseite
  • Office-KnowHow: Fortgeschritten
  • VBA-KnowHow- : Gut
  • Version [Office] : Office 2016
Antw:Office 2013: Bereich nach Zahl durchsuchen und anderes Feld ausgeben
« Antwort #3 am: Dezember 31, 2015, 13:07:56 Nachmittag »
Na ja Detlef,

ich habe ja schon das "wahrscheinlich" als Erweiterung dazu geschrieben  8).

Aber ich gehe auch davon aus, dass die Markierung in einem tieferen Block sein kann (offensichtlich wiederholen sich die Blöcke, siehe Spalte_C ab Zeile_7) und im ersten Beitrag war ja von dem markierten Bereich die Rede, der durchsucht werden soll. Und solch ein Konstrukt (Feststellung des markieten Bereichs) mag ich mit in plain Excel erst gar nicht vorstellen  ;D

Guten Rutsch an alle Helfer und Hilfe suchenden!
Gruß
Günther

Offline roschu

  • Newbie
  • *
  • Beiträge: 2
    • Profil anzeigen
  • Office-KnowHow: Fortgeschritten
  • VBA-KnowHow- : Mittelmäßig
  • Version [Office] : Office 2013
Antw:Office 2013: Bereich nach Zahl durchsuchen und anderes Feld ausgeben
« Antwort #4 am: Dezember 31, 2015, 16:25:34 Nachmittag »
super, vielen Dank!!

Ebenfalls einen guten Rutsch!

Keine Lösung gefunden? Du kannst Dich gerne an unser erfahrenes Experten-Team wenden und Dein Anliegen in Auftrag geben.
>>> Schnell und einfach ein unverbindliches Angebot anfordern. Per E-Mail an anfrage@excel-inside.de oder per Online-Formular
<<<

!!! Wichtige Information
!!! Dieses Forum steht aus technischen Gründen ab dem 11. September 2019 nur noch im Lesemodus zur Verfügung.
Das NEUE Office-Fragen-Forum kannst du aber unter der gewohnten Domain https://office-fragen.de wie gewohnt nutzen.

- Wir freuen uns auf deinen Besuch im neuen Forum.