Excel Forum - Porady, Pomoc, Excel Help, Excel FAQ - Odwołanie do nieprzystających zakresów

Leon M · Fan Excela Wersja: Win Office 2010 Posty: 98

Szanowni Forumowicze,

Kieruję do Was gorącą prośbę o pomoc w następującej kwestii:

Jak wykonać odwołania do nieprzystających zakresów w sposób, jaki obrazuje przykład podany w pliku zamieszczonym w załączniku.

Z góry pięknie dziękuję za odpowiedzi.

Demo7.xlsx

Pobierz Plik ściągnięto 13 raz(y) 11.02 KB

xfish · Wysłany: 09-02-2021, 10:21

Dla G2 i kopia w prawo:

Kod:

=PRZESUNIĘCIE($C$3;(NR.KOLUMNY(A:A)-1)*6;)

Przy założeniu, że te "zakresy" to tak naprawdę scalone komórki jak w przykładzie.

Jeżeli byłyby to faktyczne zakresy i w G2 chciałbyś C3, w G3 - C4 itd
to dla G2 i kopia w prawo i w dół:

Kod:

=PRZESUNIĘCIE($C$2;(NR.KOLUMNY(A:A)-1)*6+WIERSZ(1:1);)

kuma · Wysłany: 09-02-2021, 10:31

Spróbuj moim sposobem. Nie wiem co chcesz zrobić z tymi zakresami, ale dostęp do nich może być taki.

Kod:

Sub Zakresy()
Dim area As Range
Dim sh As Worksheet

Set sh = ActiveSheet
'wartość 23 znaczy: "wszystkie niepuste komórki zawierające błędy, wartości logoczne, liczby i tekst - bez komórek z formułami
For Each area In sh.Columns(3).SpecialCells(xlCellTypeConstants, 23).Areas
area.Select
Next area
End Sub

Leon M · Fan Excela Wersja: Win Office 2010 Posty: 98

Xfish, dziękuję pięknie za podane formuły. Obydwie będą mi przydatne.

kuma, bardzo dziękuję za makro. Prawdę mówiąc, to nie wiem, jak wykorzystać ten kod do skopiowania tych zakresów. Może jakaś podpowiedź? :-)

kuma · Wysłany: 09-02-2021, 15:29

Do wykorzystania w VBA. Może za niedługo będziesz sięgał po takie rozwiązania. 8-)

Leon M · Fan Excela Wersja: Win Office 2010 Posty: 98

kuma, tak, wiem, że w VBA. :-)

Stawiam w nim pierwsze kroki, potrafię skopiować te zakresy, jak w przykładzie, przy pomocy pętli For i Range, ale patrząc na Twój kod, widzę, że istnieją rozwiązania bardziej profesjonalne.
Gdybyś zechciał podpowiedzieć mi, jak posłużyć się Twoim makrem, owo "za niedługo", które prognozujesz, mogłoby się ziścić może już dzisiaj. :-)

kuma · Wysłany: 10-02-2021, 11:01

Jak będziesz miał taką potrzebę "obrobienia", w VBA, danych w rozrzuconych zakresach to wrzuć załącznik do odpowiedniego działu na forum i wtedy ktoś podejmie próbę rozwiązania.