Excel VBA Textbox 180 degree Rotation or Inversion

mfmccann

New Member
Joined
May 2, 2016
Messages
2
I'm new to VBA and can use some help. I'll try to attach a small file.

I'm trying to share a "Word of the day" with a group of people. I want the word to display so they can read it and so I can read it at the same time. I also want to display some information about the word; its part of speech, and its definition which only I can read. I think the file will show you what I want.

I imagine the paper folded and hung on a lectern so the word at the top (the inverted word) is visible to the audience, and the rest of the page is visible to me at the lectern.

I plan to enter the word into A1, its part of speech into A2, and its definition into A3-A8. The easy part (I think) will be getting everything to display so I can read it. The more difficult part will be displaying the word upside down so the page can be folded and the audience can read the word.

Alas, my file is not as clear as I would like.
A1 = diligent - the word
A2 = adjective - the part of speech
A3 - A8 = definition

From top to bottom to the right are Text Box 1 (the one I want inverted), and below that Text box 2 (which will hold the "right side up" copy of the word from A1). Below that are the boxes which will hold A2 and A3-A8.

[TABLE="width: 735"]
<tbody>[TR]
[TD]diligent[/TD]
[TD="align: left"]
clip_image002.png

<tbody>
</tbody>
[/TD]
[/TR]
[TR]
[TD]Adjective[/TD]
[TD][/TD]
[/TR]
[TR]
[TD="align: right"]1[/TD]
[TD][/TD]
[/TR]
[TR]
[TD]constant in effort to accomplish something; attentive and persistent indoing anything:[/TD]
[TD][/TD]
[/TR]
[TR]
[TD]a diligent student.[/TD]
[TD][/TD]
[/TR]
[TR]
[TD="align: right"]2[/TD]
[TD]fold the paper here ---------------------------------------[/TD]
[/TR]
[TR]
[TD]done or pursued with persevering attention; painstaking:[/TD]
[TD]

<tbody>
[TD="colspan: 2, align: left"]
clip_image005.png
[/TD]

[TD="colspan: 2, align: left"]
clip_image006.png
[/TD]

</tbody>
[/TD]
[/TR]
[TR]
[TD]a diligent search of the files.[/TD]
[/TR]
[TR]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD]
clip_image008.png

<tbody>
</tbody>
[/TD]
[/TR]
[TR]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[/TR]
</tbody>[/TABLE]
 

Excel Facts

Pivot Table Drill Down
Double-click any number in a pivot table to create a new report showing all detail rows that make up that number
Trying to give a more clear picture of the input (left side) and the output (right side)

[TABLE="width: 735"]
<tbody>[TR]
[TD]diligent[/TD]
[TD]Text box 1 goes here - it gets the text from A1, centered[/TD]
[/TR]
[TR]
[TD]Adjective[/TD]
[TD]but flipped vertically, so it can be read when the page is[/TD]
[/TR]
[TR]
[TD="align: right"]1[/TD]
[TD]folded. Font must be large - visible from a distance.[/TD]
[/TR]
[TR]
[TD]constant in effort to accomplish something; attentive and persistent indoing anything:[/TD]
[TD]This box is the biggest challenge (IMHO)[/TD]
[/TR]
[TR]
[TD]a diligent student.[/TD]
[TD][/TD]
[/TR]
[TR]
[TD="align: right"]2[/TD]
[TD]fold the paper here ---------------------------------------[/TD]
[/TR]
[TR]
[TD]done or pursued with persevering attention; painstaking:[/TD]
[TD][/TD]
[/TR]
[TR]
[TD]a diligent search of the files.[/TD]
[TD]Text box 2 goes here. Same text as textbox1, but[/TD]
[/TR]
[TR]
[TD][/TD]
[TD]right-side-up and smaller[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD]Text box 3 goes here - it gets the content of A2[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD]text box 4 goes here - it gets the contents of A3-A8[/TD]
[/TR]
[TR]
[TD][/TD]
[TD]or I can force all of A3-A8 into A3 and it just gets that[/TD]
[/TR]
[TR]
[TD][/TD]
[TD]This holds the definition(s) of the word of the day[/TD]
[/TR]
[TR]
[TD]Once the text is in all the boxes, print[/TD]
[TD][/TD]
[/TR]
[TR]
[TD]a page witht eh 4 text boxes on it, and[/TD]
[TD][/TD]
[/TR]
[TR]
[TD]I can input a different word/definition[/TD]
[TD][/TD]
[/TR]
[TR]
[TD]and do it again.[/TD]
[TD][/TD]
[/TR]
</tbody>[/TABLE]
 
Upvote 0

Forum statistics

Threads
1,224,943
Messages
6,181,915
Members
453,071
Latest member
Gizmo2024

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top