1. Zuhause
  2. Frage und Antwort
  3. eine Zeile, wenn. Makro

eine Zeile, wenn. Makro

2017-08-11 4 views
-1

Ich habe Daten wie folgt.eine Zeile, wenn. Makro

enter image description here

Ich brauche alle Zahlen nehmen von „ELEVATION \ AZIMUT“ und ihnen eine Zeile nach oben ziehen. Kann mir jemand zeigen, wie man das mit VBA macht?

Quelle

2017-08-11 Skirmante Valentaite

+0

können Sie lernen, wie man selbst, das zu tun. Beginnen Sie einfach mit der Aufzeichnung eines Makros und machen Sie das, was Sie in Ihrem Arbeitsblatt tun möchten. –

+0

Sie möchten die Daten in Zeilen verschieben, die mit "_ELEVATION \ AZIMUTH_" beschriftet sind, und die Daten in die Zeile über jeder dieser Zeilen verschieben ... die obersten _ELEVATION \ AZIMUTH_-Daten werden in _AZIMUTH_ Zeile verschoben ... die nächste _ELEVATION \ AZIMUTH_ Daten bewegen sich in _ELEVATION_ und so weiter ......... schau auf dein Blatt, ich glaube nicht, dass du das wirklich willst .... ist das was du verlangst? – jsotola

+0

ja es ist was ich @jsotola will. Ich habe diese Zeilen über 3000 .. also muss ich alle Zahlen von ELEVATION \ AZIMUTH finden und sie eine Zeile nach oben bewegen. Danach lösche ich die Zeile mit ELEVATION \ AZIMUTH –

Antwort

1

ungetestet

dim c as range 
for each c in range("A2:5000").cells 
    if c.value = "ELEVATION\AZIMUTH" then c.offset(0,1).resize(1,100).cut c.offset(-1,1) 
next c

Quelle

2017-08-11 06:44:00

+0

Vielen Dank! das funktioniert :) @Tim Williams –

Verwandte Themen

 Verwandte Themen