Thema Datum  Von Nutzer Rating
Antwort
06.10.2022 17:50:08 Eva
NotSolved
Blau mit Schleife eine Spalte weiterziehen
06.10.2022 19:56:12 Mase
NotSolved
07.10.2022 16:40:41 Gast79931
NotSolved
08.10.2022 11:37:09 Mase
NotSolved
14.10.2022 18:15:08 Eva-Maria
NotSolved
07.10.2022 16:45:15 Eva
NotSolved

Ansicht des Beitrags:
Von:
Mase
Datum:
06.10.2022 19:56:12
Views:
612
Rating: Antwort:
  Ja
Thema:
mit Schleife eine Spalte weiterziehen

Bin mir nicht sicher, ob richtig verstanden, aber schau Dir folgende Skizze mal an:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Dim rngLikeliHood   As Excel.Range
Dim rngImpact       As Excel.Range
Dim c               As Excel.Range
Dim vLikeliHood     As Variant
Dim vImpact         As Variant
 
Set rngLikeliHood = Range("I3:I7")
Set rngImpact = Range("J2:N2")
 
For Each c In Range("A2:A4")
    vLikeliHood = Application.Match(c.Offset(0, 1).Value, rngLikeliHood, 0)
    vImpact = Application.Match(c.Offset(0, 2).Value, rngImpact, 0)
    MsgBox c.Value & " => " & Cells(vLikeliHood + 2, vImpact + 9).Address
Next c

 

und gehe das via F8 zeilenweise, unter folgendender Dateistruktur, durch:

 

 


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
06.10.2022 17:50:08 Eva
NotSolved
Blau mit Schleife eine Spalte weiterziehen
06.10.2022 19:56:12 Mase
NotSolved
07.10.2022 16:40:41 Gast79931
NotSolved
08.10.2022 11:37:09 Mase
NotSolved
14.10.2022 18:15:08 Eva-Maria
NotSolved
07.10.2022 16:45:15 Eva
NotSolved