---
title: "Snygga till en variabel"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/7652-snygga-till-en-variabel"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Brimba"
published: "2001-01-09T08:59:00.000Z"
updated: "2001-01-10T07:36:00.000Z"
replies: 4
views: 232
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/7652-snygga-till-en-variabel"
---

# Snygga till en variabel

## #1 — Brimba, 2001-01-09T08:59Z

Hej!

Jag har en variabel som ser ut såhär:

"nils-gunnar olofsson"

jag kan göra om den med olika funktioner till:

"Nils-gunnar Olofsson"
samt
"Nils-Gunnar olofsson"

men jag vill ha en funktion som gör om den till
"Nils-Gunnar Olofsson"

Någon som har några idéer om hur man går tillväga?

Permalänk: https://www.webforum.nu/p/7652

## #2 — PatrikB, 2001-01-09T12:18Z

Hello,

här kommer det en liten funktion som du gör det du vill att den ska göra =O

```
Function SnyggaTill(varData)
	Dim arrTemp
	Dim strOP
	
	arrTemp = Split(varData)
	For I = LBound(arrTemp) To UBound(arrTemp)
		arrTemp(I) = Left(UCase(arrTemp(I)),1) & Right(arrTemp(I),Len(arrTemp(I)) - 1)

			arrTemp2 = Split(arrTemp(I),"-")
			For N = LBound(arrTemp2) To UBound(arrTemp2)
				arrTemp2(N) = Left(UCase(arrTemp2(N)),1) & Right(arrTemp2(N),Len(arrTemp2(N)) - 1)
				'## -- edit börjar här
				If N = 1 Then
					strOP = strOP & "-" & arrTemp2(N)
				Else
					strOP = strOP & " " & arrTemp2(N)
				End If
				'## -- edit slutar här
			Next
			
	Next
	
	SnyggaTill = strOP
End Function
```

cya

Permalänk: https://www.webforum.nu/p/253575

## #3 — Brimba, 2001-01-10T06:59Z

Mjae, det var inte riktigt vad jag hade tänkt mig.

Det är klart att det var inte lätt för dig att veta men jag berättar nu :)

Låt säga att man heter:

"sven-erik-volter hERmansson"

Då "döps" man om till Sven-Erik Volter HERmansson

Alltså ett av bindestrecken försvinner och efternamnet får bara stor bokstav utan att resten ändras.

Några andra idéer?

Permalänk: https://www.webforum.nu/p/253576

## #4 — @nders, 2001-01-10T07:09Z

efternamnet får bara stor bokstav utan att resten ändras.

börja med att sätta varData = lcase(varData) högst upp i funktionen så borde du komma förbi det.

hur du ska göra för att få alla bindestreck rätt vet jag inte, har inte tittat på funktionen... ;)

Permalänk: https://www.webforum.nu/p/253577

## #5 — PatrikB, 2001-01-10T07:36Z

För att få alla bindestreck rätt ändra denna rad:

```
If N = 1 Then
```

Till:

```
If N >= 1 Then
```

cya

Permalänk: https://www.webforum.nu/p/253578

---

Tråden på webben: https://www.webforum.nu/amne/asp/7652-snygga-till-en-variabel