VBA/excel extract multiple strings between symbols in cell

The name of the pictureThe name of the pictureThe name of the pictureClash Royale CLAN TAG#URR8PPP



VBA/excel extract multiple strings between symbols in cell



I have a spreadsheet with multiple cells with a bunch of text in them. Within the text are a few words/sentences between @ symbols. There are multiple of these strings in each cell.



So for example:



Lorem ipsum dolor sit amet, @consectetur adipiscing elit@. Curabitur sapien nibh, faucibus ut odio ut, vehicula elementum nunc. @Fusce consequat risus vel dui tincidunt@ condimentum.



I need a solution to extract the @...@ strings, let's say into the adjacent column.



Edit to respond to comments: No solution could be attempt fully yet before making this post as I didn't know how to start - the main challenge seems to be around multiple @...@ strings in the text.



Other solutions I researched did not seem to work with multiple delimiters:



excel vba- extract text between 2 characters



Any solutions are appreciated.



Thanks





You could go Data > Text To Columns and split it into separate columns using @ as a delimiter.
– ashleedawg
Aug 8 at 2:10


Data


Text To Columns


@





Please read Why is “Can someone help me?” not an actual question?.
– Mathieu Guindon
Aug 8 at 2:30





@simon: Welcome to Stack Overflow: Please take the tour and read How to ask a good question, then edit your question to include the code, expected behaviour, and what is wrong... then we can try to help
– Our Man in Bananas
Aug 8 at 8:33





I Downvoted/voted to close because you didn't include a Minimal, Complete, and Verifiable example , it looks like no attempt was made, and it looks like no research was done.
– Our Man in Bananas
Aug 8 at 8:33





@simon: please show us what you have tried
– Our Man in Bananas
Aug 8 at 8:34




1 Answer
1



Try this code


Sub Test()
Dim a, x, i As Long, ii As Long

a = Range("A1:A" & Cells(Rows.Count, 1).End(xlUp).Row).Value

For i = LBound(a) To UBound(a)
x = Split(a(i, 1), " @")
For ii = 1 To UBound(x)
Cells(i, ii + 1).Value = Mid(x(ii), 1, InStr(x(ii), "@") - 1)
Next ii
Next i
End Sub





Thank you, this works partially. This splits every string with a space before the first @ delimiter. So "text text @string@." splits "string" correctly but for "text text@string@." nothing is split.
– Simon
Aug 8 at 14:44





I depended on your first example .. Try tweaking that to suit your needs
– YasserKhalil
Aug 8 at 15:14






By clicking "Post Your Answer", you acknowledge that you have read our updated terms of service, privacy policy and cookie policy, and that your continued use of the website is subject to these policies.

-

Popular posts from this blog

Firebase Auth - with Email and Password - Check user already registered

Image
Clash Royale CLAN TAG #URR8PPP Firebase Auth - with Email and Password - Check user already registered I want to check when a user attempts to signup with createUserWithEmailAndPassword() in Firebase user Authentication method, this user is already registered with my app. createUserWithEmailAndPassword() 8 Answers 8 To detect whether a user with that email address already exists, you can detect when the call to createUserWithEmailAndPassword () fails with auth/email-already-in-use . I see that @Srinivasan just posted an answer for this. createUserWithEmailAndPassword () auth/email-already-in-use Alternatively, you can detect that an email address is already used by calling fetchSignInMethodsForEmail() (previous called fetchProvidersForEmail() ). fetchSignInMethodsForEmail() fetchProvidersForEmail() When the user trying to create an user with same email address, the task response will be "Response: The email address is already in use by another account." mFirebas
Read more

Dynamically update html content plain JS

Image
Clash Royale CLAN TAG #URR8PPP Dynamically update html content plain JS So I have a script bound in my index.html, which literally has to fetch an array of jsons from an api, then dynamically update my page when get response. But as a result I'm getting an as the only update of my page. here is my script fetch(url) .then((resp) => resp.json()) .then((resp) => resp.results.forEach(item => fetch(item.url) .then((response)=> response.json()) .then((response) => pokeArr.push(response)) .catch(console.log) ) ).catch(console.log) const filler = () => if(!pokeArr) return 0 pokeArr.map((i,j)=> return `<tr>$i.name</tr>` ) const pokeindex = () => document.getElementById('a').appendChild(document.createElement(filler())) pokeindex() When I'm consoling it, I can see in the console all the responses I get, so I'm at least doing the fetching part right. What's parberakan ? What's pokeArr ? – T.J. Crowder Aug 8 at 12
Read more

How to determine optimal route across keyboard

Image
Clash Royale CLAN TAG #URR8PPP How to determine optimal route across keyboard I'm trying to automate the typing process in a video game. Players are given an on-screen QWERTY keyboard layout that they can navigate with the control stick (up, down, left, right) in order to select a letter to type. I was wondering if there was a module for Python (or some other resource I could explore) that would help my program find a path across the keyboard as it types each letter in a given message. In other words, if the first letter typed was "A" and the next letter was "B", the module would know that the program should move 1 space down on the keyboard and 4 spaces to the right. Currently, I have the program resetting to the "G" key after each letter is typed (allowing me to use fixed-directions as the program parses each character in the desired message). As you can imagine, this is quite inefficient and defeats the purpose of automating the typing in the fir
Read more