Excel Forum - Porady, Pomoc,  Excel Help, Excel FAQ Strona Główna
 FAQ  RegulaminRegulamin  Szukaj   Użytkownicy   Grupy   Rejestracja   Profil   Twoje wiadomości   Zaloguj 


Poprzedni temat «» Następny temat
ID tematu: 70096 Skopiuj do schowka Odwołanie do nieprzystających zakresów
Autor Wiadomość
Leon M 
Fan Excela


Wersja: Win Office 2010
Posty: 98
Wysłany: 09-02-2021, 09:24   Odwołanie do nieprzystających zakresów

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

ID posta: 400017 Skopiuj do schowka
 
 
xfish 
Excel Expert



Wersja: Win Office 2013
Pomógł: 447 razy
Posty: 1388
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);)
_________________
Pozdrawiam
xFish
Ostatnio zmieniony przez xfish 09-02-2021, 10:31, w całości zmieniany 1 raz  
ID posta: 400028 Skopiuj do schowka
 
 
kuma 
Excel Expert


Wersja: Win Office 2010
Pomógł: 1440 razy
Posty: 4108
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
_________________
Pozdrawiam.
ID posta: 400029 Skopiuj do schowka
 
 
Leon M 
Fan Excela


Wersja: Win Office 2010
Posty: 98
Wysłany: 09-02-2021, 14:27   

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ź? :-)
ID posta: 400057 Skopiuj do schowka
 
 
kuma 
Excel Expert


Wersja: Win Office 2010
Pomógł: 1440 razy
Posty: 4108
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-)
_________________
Pozdrawiam.
ID posta: 400059 Skopiuj do schowka
 
 
Leon M 
Fan Excela


Wersja: Win Office 2010
Posty: 98
Wysłany: 09-02-2021, 17:45   

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. :-)
ID posta: 400063 Skopiuj do schowka
 
 
kuma 
Excel Expert


Wersja: Win Office 2010
Pomógł: 1440 razy
Posty: 4108
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.
_________________
Pozdrawiam.
ID posta: 400087 Skopiuj do schowka
 
 
Wyświetl posty z ostatnich:   
Odpowiedz do tematu
Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
Nie możesz załączać plików na tym forum
Możesz ściągać załączniki na tym forum
Dodaj temat do Ulubionych
Wersja do druku

Skocz do:  

Powered by phpBB modified by Przemo © 2003 phpBB Group
Theme xandgreen created by spleen& Programosy modified v0.3 by warna
Opieka techniczna www.marketingNET.pl

Archiwum

Strona używa plików cookies.

Kliknij tutaj, żeby dowiedzieć się jaki jest cel używania cookies oraz jak zmienić ustawienia cookie w przeglądarce.
Korzystając ze strony użytkownik wyraża zgodę na używanie plików cookies, zgodnie z bieżącymi ustawieniami przeglądarki.
Sprawdź, w jaki sposób przetwarzamy dane osobowe