VBA - Sort data on TextBox1 from oldest to newest.

[Attrazion]

Hi, Can someone help me with this problem? I need to display the oldest to newest data on the textbox based on the month and date in the Notes column.

Private Sub UserForm_Initialize()

  Dim firstSheet As String
  Dim secondSheet As String
  Dim thirdSheet As String
  Dim Result As String
  
  firstSheet = Worksheets("Precious").Range("D2").Value
  secondSheet = Worksheets("Sol").Range("D2").Value
  thirdSheet = Worksheets("Angel").Range("D2").Value
  
  Results = firstSheet & vbCrLf & secondSheet & vbCrLf & thirdSheet
  
  

  Me.TextBox1.Value = Results
  TextBox1.MultiLine = True

Book11.xlsx
	A	B
1	Date	Notes
2	03/05/2023	Adrian Santos
3	03/06/2023	Adrian Sanchez
4	03/06/2023	Ranch Book
5	03/07/2023	Auto Sum
6	03/08/2023	Fernandez
7	03/09/2023	Tolentino
8	03/10/2023	Loti
9	02/04/2023	04/01: borrowed 21$
10	03/12/2023	Duke
11
Precious

Cell Formulas
Range	Formula
A9	A9	=TODAY()

Book11.xlsx
	A	B
1	Date	Notes
2	03/05/2023	Adrian Santos 1
3	03/06/2023	Adrian Sanchez 2
4	03/06/2023	Ranch Book 3
5	03/07/2023	Auto Sum 4
6	03/08/2023	Fernandez 5
7	03/09/2023	Tolentino 6
8	03/10/2023	Loti 7
9	02/04/2023	04/02: borrowed 25$
10	03/12/2023	Duke 9
11
Sol

Cell Formulas
Range	Formula
A9	A9	=TODAY()

Book11.xlsx
	A	B
1	Date	Notes
2	03/05/2023	03/05: borrowed 11$
3	03/06/2023	03/06: borrowed 11$
4	03/06/2023	03/06: borrowed 12$
5	03/07/2023	03/07: borrowed 13$
6	03/08/2023	03/08: borrowed 14$
7	03/09/2023	03/09: borrowed 15$
8	03/10/2023	03/10: borrowed 16$
9	11-Mar-23	03/11: borrowed 17$
10	03/12/2023	03/12: borrowed 18$
11	02/04/2023	03/29: borrowed 19$
Angel

Cell Formulas
Range	Formula
A11	A11	=TODAY()

 

[James006]

Hi,

Just sort your data the way you need it ... before populating your TextBox ...

 

[Attrazion]

Hi, thanks for the reply. Please excuse my Ignorance. But how can I do it?

Hi,

Just sort your data the way you need it ... before populating your TextBox ...

 

[James006]

The Excel menu offers A to Z and Z to A sorting ...

How to Sort Values in Microsoft Excel

Excel has “Sort A to Z” and “Sort Z to A” features that let you sort values alphabetically or numerically, and a “Custom Sort” feature that lets you sort using multiple criteria. Here’s how to use them.

www.howtogeek.com

 

[Fluff]

Duplicate to: Displays data from oldest to newest VBA

In future, please do not post the same question multiple times. Per Forum Rules (#12), posts of a duplicate nature will be locked or deleted.

In relation to your question here, I have closed this thread so please continue in the linked thread