Copy Part Cell Value to Memory

[Gbenga]

Hi.
I extract a part of the value in a cell in column A to another cell in column B. But I also need to keep the extracted value in memory for use in another application. How do I I do this each time I enter values into any cell in column A?

 

[DanteAmor]

Welcome to the MrExcel forum. Please accept my warmest greetings and sincere hope that all is well.

The following is an example of what you need to put a text in memory

sub test()
  Dim MyData As New DataObject
  
  MyData.SetText Range("A1").text, 1
  MyData.PutInClipboard
end sub

You do not explain in detail which cell, or which part of the cell, but with the previous example I hope you can find the solution.


Or with that data you can search in this forum or on the net, for example:

COPYING ONLY A HIGHLIGHTED SELECTION OF USERFORM TEXTBOX TEXT TO A CELL ON ANOTHER SHEET

As above. The following code copies the entire Textbox1 container, not just the highlighted selection. Private Sub CommandButton1_Click() Dim MyData As New DataObject MyData.SetText TextBox1.Text ---> copies entire textbox text - not what I want MyData.PutInClipboard End Sub...

www.mrexcel.com

Regards
Dante Amor

 

[Gbenga]

Thanks for your response, DanteAmor.
I have set B cells to =MID(A1,SEARCH("[",A1)+1, SEARCH("]",A1)-SEARCH("[",A1)-1) to extract everything within square brackets in any cell in A column, and the B cells have their data once an A cell is updated. What I am trying to avoid is having to manually copy B cell value into memory. I use the extracted value to search another application. When A2 is updated, I want to use the new extracted value for another search, etc.

 

[Peter_SSs]

=MID(A1,SEARCH("[",A1)+1, SEARCH("]",A1)-SEARCH("[",A1)-1)

Not related to your question, but you could try this instead of the above if you have the new functions available.

=TEXTAFTER(TEXTBEFORE(A1,"]"),"[")

 

[Gbenga]

Welcome to the MrExcel forum. Please accept my warmest greetings and sincere hope that all is well.

The following is an example of what you need to put a text in memory

sub test()
  Dim MyData As New DataObject
 
  MyData.SetText Range("A1").text, 1
  MyData.PutInClipboard
end sub

You do not explain in detail which cell, or which part of the cell, but with the previous example I hope you can find the solution.


Or with that data you can search in this forum or on the net, for example:

COPYING ONLY A HIGHLIGHTED SELECTION OF USERFORM TEXTBOX TEXT TO A CELL ON ANOTHER SHEET

As above. The following code copies the entire Textbox1 container, not just the highlighted selection. Private Sub CommandButton1_Click() Dim MyData As New DataObject MyData.SetText TextBox1.Text ---> copies entire textbox text - not what I want MyData.PutInClipboard End Sub...

www.mrexcel.com

Regards
Dante Amor

Thanks again, Dante.
Kindly explain how to copy the text within brackets in a cell in A Column (or any column really, as long as it applies to all cells in the column) to memory so that I can use this text in another application. Like if I enter WERFHTOY SSDGERT [3456YTEJ00] into a cell, I want to use 3456YTEJ00 in another application. In Access, I would have used the AfterUpdate or similar event to capture do the job. But in Excel, am at a loss.
Secondly, you referred to a previous example which I know nothing about.