CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

Rasmus Lund Nybegynder

16. november 2006 - 13:49 Der er 14 kommentarer og
1 løsning

summe tekster op til een streng

Hej er der nogen, der ved om/hvordan, man laver en slags sum af en række celler, der indeholder tekster.
jeg har en masse e-mailadresser, som jeg gerne vil have summet op i een celle. E-mailadresserne skal komma-separeres, sådan de kan sættes direkte ind i bcc feltet på en mail.

kan man det?

Synes godt om

excelent Ekspert

16. november 2006 - 15:18 #1

hvis du har adresser i fx. A1:A20
så indsæt denne i B1 =A1

og indsæt denne i B2 =B1&","&A2
og kopier ned så langt der er data i kolonne A

højreklik på den sidste i kolonne B og vælg kopi
højreklik igen i den sidste og vælg indsæt speciel og vælg værdier

slet alle øvrige

Synes godt om

kleindk Nybegynder

16. november 2006 - 15:22 #2

Den simple metode
a1: adresse1@provider.dk
a2: adresse2@provider.dk
a3: adresse3@profider.dk

b1: =a1&","&a2&","&a3" ..... osv.

Synes godt om

Rasmus Lund Nybegynder

16. november 2006 - 16:42 #3

princippet er rigtigt i begge - men jeg synes det er omstændigt.
Jeg kender ikke til excelprogrammering, men tænker at man kan lave lidt kode i en celle der lyder noget ligende:

for (cellenr<100){
print "celleindhold, ";
}
cellenr++

Synes godt om

mrjh Novice

16. november 2006 - 17:06 #4

Prøv denne lille makro. Dine værdier er forudsat i kol. A. GEM INDEN DU KØRER MAKROEN

Sub sammensæt()
Dim mails()
sidste = Range("A65536").End(xlUp).Row
ReDim mails(sidste)
For I = 0 To sidste - 1
mails(I) = Range("A" & I + 1)
Next I
Range("B1") = Join(mails, ",")
End Sub

Synes godt om

mrjh Novice

16. november 2006 - 17:20 #5

Er det iøvrigt ikke et ; du skal bruge som seperator ?

Synes godt om

Rasmus Lund Nybegynder

16. november 2006 - 17:56 #6

skal den kodestump sættes ind i destinationscellen? og jo, det skal selvfølgelig være et ;

Synes godt om

mrjh Novice

16. november 2006 - 18:00 #7

Nej koden skal ind i VBA editoren. tryk Alt+F11 og herefter F7. Kopier koden ind og tryk F5. Teksten indsættes i B1

Synes godt om

mrjh Novice

16. november 2006 - 18:00 #8

Og så lige med den korrekte seperator :-)

Sub sammensæt()
Dim mails()
sidste = Range("A65536").End(xlUp).Row
ReDim mails(sidste)
For I = 0 To sidste - 1
mails(I) = Range("A" & I + 1)
Next I
Range("B1") = Join(mails, ";")
End Sub

Synes godt om

Rasmus Lund Nybegynder

16. november 2006 - 18:13 #9

hvis jeg først vil have den til at starte fra celle 3 og nedad - hvad skriver jeg så?

Synes godt om

mrjh Novice

16. november 2006 - 18:26 #10

Ret Range("A" & I + 1) til Range("A" & I + 3)

Synes godt om

mrjh Novice

16. november 2006 - 18:36 #11

En lille rettelse

Sub sammensæt()
Dim mails()
startrække = 3
sidste = Range("A65536").End(xlUp).Row
ReDim mails(sidste - startrække)
For I = 0 To sidste - startrække
mails(I) = Range("A" & I + startrække)
Next I
Range("B1") = Join(mails, ";")
End Sub

Synes godt om

cpacan Nybegynder

17. november 2006 - 01:40 #12

Hvorfor ikke bare kopiere alle adresserne direkte fra Excel og så indsætte i adressefeltet?

Synes godt om

cpacan Nybegynder

17. november 2006 - 01:42 #13

Rettelse: Virker i alt fald i Outlook.

Synes godt om

Rasmus Lund Nybegynder

18. november 2006 - 14:44 #14

perfekt - det virker! mrjh lav et svar, så får du dine points

Synes godt om

mrjh Novice

18. november 2006 - 20:06 #15

Det får du :-)

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Excel kurser

Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.

Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Betinget formatering Af Ninna i Excel	1	I går 13:03	I går 19:56
Opdater et ark Af lurup i Excel	2	22/07/202422:23	I går 16:41
Dato skema Af Ninna i Excel	7	22/07/202414:58	I går 19:55
Betinget formatering Af boro23 i Excel	2	22/07/202410:58	I går 07:14
Problem med beregning af alder udfra cpr-nummer; formel giver talfejl pga. nul i CPR Af HR Excel-bruger i Excel	6	16/07/202416:31	17/07/202408:36

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS