Miten toteuttaa jos soluun A1 syötetään 109ab9049f56 niin kun painetaan enter niin solussa oleva arvo muuttuukin muotoon 10:9a:b9:04:9f:56 eli lisää joka toisen merkin väliin : pisteet?
Mac osoite
9
988
Vastaukset
- Anonyymi
Ettei vaan elokuvaksi muutu.
- Anonyymi
Se on aina vaara M$ tuotteissa!
- Anonyymi
Käy kysy kirjastonhoitajalta josko olisi hidasteena toimivaan kytkimeen rasvaa.
- Anonyymi
Anna sille se syöttökaavaan muutuja, muuttuja, : tyyliin!
- Anonyymi
Unohda jo toimimattomat Microsft ohjelmat!
- Anonyymi
Löytyy yksinkertainen esimerkki.
To format a MAC address string without delimiters to a MAC address separated by a colon (:) or hyphen (-), you can use a formula based on the TEXTJOIN, MID, and SEQUENCE functions. In the example shown, the formula in D5, copied down, is:
=TEXTJOIN(C5,1,MID(B5,SEQUENCE(6,1,1,2),2))
The formula returns the formatted strings as seen in column D.- Anonyymi
Kiitos :)
- Anonyymi
Ko. sivun moduliin:
Private Sub Worksheet_Change(ByVal Target As Range)
' Tähän ne alueet, joilla muutos tehdään
If Intersect(Target, Range("E3:F4")) Is Nothing Then Exit Sub
uusi = ""
m = 0
For i = 1 To Len(Target.Text)
ch = Mid(Target.Text, i, 1)
If m = 2 Then
uusi = uusi + ":"
m = 0
End If
Select Case UCase(ch)
Case "0" To "9", "A" To "F": uusi = uusi + ch: m = m + 1
End Select
Next i
On Error GoTo err:
Application.EnableEvents = False
If Len(uusi) = 17 Then
Target = uusi
Target.Interior.Pattern = xlNone
Else
Target.Interior.Color = RGB(255, 255, 0)
End If
err:
Application.EnableEvents = True
End Sub tavalliseen moduuliin...
Function TekeeMAC(ByVal MAC As String) As String
Dim i As Long
For i = Len(MAC) - 2 To 2 Step -2
MAC = Left(MAC, i) & ":" & Mid(MAC, i + 1)
Next
TekeeMAC = MAC
End Function
Voit käyttää funktiota solussa tyyliin =TekeeMAC(I4)
Keep EXCELing
@Kunde
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Suureksi onneksesi on myönnettävä
Että olen nyt sitten mennyt rakastumaan sinuun. Ei tässä mitään, olen kärsivällinen ❤️851748Perusmuotoiset TV-lähetykset loppu
Nyt sanoo useiden HD-muotoistenkin kanavien kohdalla äly-TV, ettei kanava ole käytössä, haluatko poistaa sen? Kanavia1201164YLE Äänekosken kaupunginjohtaja saa ankaraa arvostelua
Kaupungin johtaja saa ankaraa kritiikkiä äkkiväärästä henkilöstöjohtamisestaan. Uusin häirintäilmoitus päivätty 15 kesä581026- 62916
Hyvin. Ikävää nainen,
Että vainoat ja stalkkaat miestäni.onko tarkoituksesi ehkä saada meidät eroamaan?no,siinä et tule onnistumaan74836- 57790
Uskomaton tekninen vaaliliitto poimii rusinoita pullasta
Korni näytösesitelmä menossa kaupunginvaltuustossa. Juhlia ei ole kokouksista tiedossa muilla, kuin monipuolue paikalli78789Linnasuolla poliisi operaatio
Kamalaa menoa taas meidän ihanassa kaupungissa. https://www.uutisvuoksi.fi/paikalliset/864606029786Missä kaikessa olet erilainen
Kuin kaivattusi? Voin itse aloittaa: en ole vegaani kuten hän. Enkä harrasta tietokonepelejä lainkaan.39757Katsoin mies itseäni rehellisesti peiliin
Ja pakko on myöntää, että rupsahtanut olen 😆. Niin se ikä saavuttaa meidät kaikki.43756