Czy da się w excelu wyjąć kolumnę do "jednej" linii + komórki oddzielić przecinkami?

	B O A R D
	» Board » Zadaj pytanie » Archiwum » Szukaj » Stylizacja

M E N U

» Nowości

» Archiwum

» Recenzje / Testy

» Board

» Rejestracja

Szukaj @ TwojePC

	OBECNI NA TPC
	» piszczyk 01:43 » Chavez 01:26 » Chrisu 01:25 » metacom 01:21 » Martens 01:17 » BoloX 01:16 » Dzban 01:02 » Qjanusz 00:53 » Irys 00:51 » ulan 00:41 » RaPToRR 00:22 » zibi13 00:10 » esteban 23:52 » alkatraz 23:48 » Menah 23:36 » luckyluc 23:27 » Wolf 23:25 » selves 23:24 » wrrr 23:24 » fiskomp 23:14 Dzisiaj przeczytano 36885 postów, wczoraj 25433 Szybkie ładowanie jest: włączone.

ccc

A R C H I W A L N A W I A D O M O Ś Ć

Czy da się w excelu wyjąć kolumnę do "jednej" linii + komórki oddzielić przecinkami? , DmK 29/08/07 11:10
Mam taki problem, dostałem listę którą muszę ładnie wprowadzić do skryptu w sql. Jest to kolumna zawierająca wartości liczbowe. Potrzebuję wyjąć z niej wartości w ten sposób żeby otrzymać linię w formacie: dane,dane,dane,dane... Czy jest to wykonalne w jakiś w miarę prosty sposób?

i jednocześnie w OpenOffice , DmK 29/08/07 11:12
j.w.
W excelu manualnie , JOTEM 29/08/07 11:16
np tak:
funkcją TRANSPONUJ z kolumny do wiersza,
zapisujesz do formatu csv ze średnikami,
w dowolnym edytorze (notatnik?) zamieniasz średniki na przecinki. Razem moment roboty.
Poryjemy..zrobaczymy
1. Co do transponuj , JOTEM 29/08/07 11:25
  to funkcja tablicowa - zaznaczasz zakres komórek do jakiego ją wprowadzasz (np 100 komórek w wierszu), wpisujesz np. =TRANSPONUJ($A$1:$A$100) i zatwierdzasz SHIFT+CTRL+ENTER
  Poryjemy..zrobaczymy
2. super , DmK 29/08/07 11:49
  dzięki za informacje, obecnie siedzę na OO więc spróbuję to przenieś do niego.
3. nawet nie musisz uzywac transponuj , waski 29/08/07 11:59
  tylko np skopiowac kolumne z excela, wkleic do worda tam tabela -> zamien na tekst no i potem tylko znaki konca akapitu zamienic na przecinki
  SNAFU
  Situation Normal, All Fucked Up
  1. dzięki , DmK 29/08/07 12:04
    ta informacja też się przyda
4. działa tak jak powinno , DmK 29/08/07 12:02
  serdeczne dzięki za szybką pomoc
W VBA , ligand17 29/08/07 12:20
na przykład tak:

tekst = ""
For i = 1 To ActiveSheet.UsedRange.Rows.Count
tekst = tekst + "," + ActiveSheet.Cells(i, 1)
Next i

Być może "+" będzie trzeba zamienić na "&"
1. Acha , ligand17 29/08/07 12:22
  no i na końcu:
  
  fso.CreateTextFile("Test.txt").WriteLine tekst
  fso.CreateTextFile("Test.txt").Close
  
  Powinno zadziałać od razu.
2. to wykorzystam , DmK 29/08/07 13:29
  na następnym etapie wtajemniczenia, ponieważ w OO to raczej nie zadziała. Ale w excelu jako wygodne makro chętnie to wypróbuje.