Elektroda.pl
Elektroda.pl
X
Proszę, dodaj wyjątek www.elektroda.pl do Adblock.
Dzięki temu, że oglądasz reklamy, wspierasz portal i użytkowników.

Makro złącz teksty dla zmmiennej ilości komórek

marcindargiewicz 28 Lip 2011 23:00 5276 6
  • #1 28 Lip 2011 23:00
    marcindargiewicz
    Poziom 10  

    Witam,
    czy ktoś napisał makro które było by odzwierciedleniem formuły złącz teksty.

    Dane znajdują się kolumnie a w nieokreślonej ilości wierszy. Może to być zarówno kilka jak i kilka tysięcy. Czy jest możliwość napiania takiego stwora który rozpoznałby ilość wierszy niepustych i po takim rozpoznaniu złączył ze sobą watości tych komórek oddzielająć je od siebie znakami ", ".

    0 6
  • Pomocny post
    #2 29 Lip 2011 08:04
    adamas_nt
    Moderator Programowanie

    Pętla (lub dwie zagnieżdżone w zależności od układu) i warunkowe przypisanie (tekst = tekst & ", " & nextTekst).

    1
  • #3 29 Lip 2011 20:42
    marcindargiewicz
    Poziom 10  

    Dzięki za info. Spróbuję i pokarzę rezultat. Teraz klecę wcześniejsze etapy. Skończyłem 1. czyli przenoszenie danych. Teraz zaczynam 2 czyli układanie danych i usuwanie dubli, a łączenie tekstu będzie w 3 etapie

    Dodano po 5 [godziny] 39 [minuty]:

    Mam prośbę o krótki przykład. Nie dałem rady sam nic zdziałać. Dzięki.

    0
  • Pomocny post
    #4 29 Lip 2011 21:04
    adamas_nt
    Moderator Programowanie

    Np takie coś

    Kod: vb
    Zaloguj się, aby zobaczyć kod
    i w efekcie
    Makro złącz teksty dla zmmiennej ilości komórek

    0
  • #5 30 Lip 2011 00:16
    marcindargiewicz
    Poziom 10  

    Dzięki, ale mi by zależało aby ten złączony tekst nie pojawiał sie jako komunikat tylko żeby buł wklejony do komórki E2 jako tekst, bez łączy, bez zaijania tekstu w komórce

    0
  • Pomocny post
    #6 30 Lip 2011 08:29
    adamas_nt
    Moderator Programowanie

    zamiast: MsgBox tekst
    wpisz: [e2]=tekst
    i sformatuj komórkę E2...

    0
  • #7 03 Sie 2011 18:23
    marcindargiewicz
    Poziom 10  

    Dzięki za jak zwykle niezawodną podpowiedź.

    0