Join Funktion

Bild

Betrifft: Join Funktion von: Victor
Geschrieben am: 26.03.2005 16:26:01

Frohe Ostern,
kann mir jemand ein Beispiel für die Join-Funktion geben?
Die Hilfe dazu ist sehr knapp und ich versteh das nicht richtig.
Mir geht es darum Texte aus Spalte B einer Tabelle in eine Textdatei zu speichern.
Das Ergenis muss so aussehenmit dem Pipezeichen getrennt | :
Text1|Text2|Text3|Text4|Text5
Text6|Text7|Text8|Text9|Text10
usw.
Danke für Hilfe
Victor

Bild


Betrifft: AW: Join Funktion von: Beate Schmitz
Geschrieben am: 26.03.2005 16:50:46

Hallo Victor,

Guckst Du: Split und Join

https://www.herber.de/index.html?https://www.herber.de/tutorial/2002/basics5.htm

Gruß,
Beate


Bild


Betrifft: AW: Join Funktion von: Victor
Geschrieben am: 26.03.2005 17:14:04

Hi,

danke, aber das kann ich nicht für meine Zwecke anpassen, zu wenig Kenntnisse.

Gruß Victor


Bild


Betrifft: AW: Join Funktion von: K.Rola
Geschrieben am: 26.03.2005 21:06:35

Hallo,

gehts dir nur darum die Texte zu joinen oder auch um den Export in die Textdatei?

Gruß K.Rola


Bild


Betrifft: AW: Join Funktion von: Victor
Geschrieben am: 26.03.2005 22:09:49

Hallo K.Rola,

es geht mir nur im die Join-Funktion, der Export klappt schon.

Gruß Victor


Bild


Betrifft: AW: Join Funktion von: K.Rola
Geschrieben am: 26.03.2005 22:36:35

Hallo,
so z.B.:
Option Explicit
Sub Joine_mal()
Dim arrJoin, arrTmp(5), z As Long, a As Byte, i As Long
For z = 1 To 25 Step 5
  i = i + 1
  For a = 0 To 4
    arrTmp(a) = Cells(z + a, 2)
    arrJoin = Join(arrTmp, "|")
    Cells(i, 3) = arrJoin
  Next
Next
End Sub


Die verketten Werte werden zur Visualisierung in Spalte C geschrieben.

Gruß K.Rola

Der Fleiß ist die Wurzel aller Häßlichkeit.

Oscar Wilde




Bild


Betrifft: danke, passt genau ot von: Victor
Geschrieben am: 27.03.2005 13:22:17

ot


 Bild

Beiträge aus den Excel-Beispielen zum Thema "Join Funktion"