---
title: "RegEx i VBA"
type: "forum-thread"
url: "https://www.webforum.nu/amne/dotnet/178039-regex-i-vba"
topic: ".NET"
topic_url: "https://www.webforum.nu/amne/dotnet"
author: "Pedda"
published: "2009-04-15T12:42:03.000Z"
updated: "2009-04-17T18:21:02.000Z"
replies: 2
views: 463
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/dotnet/178039-regex-i-vba"
---

# RegEx i VBA

## #1 — Pedda, 2009-04-15T12:42Z

Någon som har koll på regular expressions i VBA?
Har en sträng som ser ut så här:
Generic Failure Report - Generated on 11 Mar 2009 by Nisse Hult

det jag vill plocka ut är datumet till en sträng och namnet till en annan sträng.
Namnet kan så klart se ut på olika sätt, men är alltid i slutet på strängen efter "by".

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

## #2 — voigtann1, 2009-04-15T13:18Z

```
(\d{1,2} (?:jan|feb|mar) \d{4}) by (.+)$
```

där du få kanske lägga in alla månader, eller byter ut jan\|feb osv till \\w{3} om det alltid är 3 tecken.

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

## #3 — Laszlo Bence, 2009-04-17T18:21Z

Kan det här fungera?

Sub delastring()
Dim dat$, namn$, origstring As String
Dim i%, inr2%, inr As Integer

    origstring = "Generic Failure Report - Generated on 11 Mar 2009 by Nisse Hult"
    i = Len(origstring)
    inr = InStrRev(origstring, "on ")
    dat = Mid(origstring, (inr + 3), 11) 'dat innehåller datum
    i = Len(origstring)
    inr = InStrRev(origstring, "by ")
    inr2 = i - inr
    namn = Right(origstring, inr2 - 2)  'namn innehåller namnet

End Sub

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

---

Tråden på webben: https://www.webforum.nu/amne/dotnet/178039-regex-i-vba