Replies

I’ve just copied your code to my ppt visual basic and it works GREAT!

Only one small detail. The picture insert / open conventional window defaults to “all files” instead of only graphics files extensions. How can I modify the code so I don’t have to set it manually every time, to filter, for example, gif’s, tif’s and jpg’s only?

THANX!!!

I’ve just copied your code to my ppt visual basic and it works GREAT!

Only one small detail. The picture insert / open conventional window defaults to “all files” instead of only graphics files extensions. How can I modify the code so I don’t have to set it manually every time, to filter, for example, gif’s, tif’s and jpg’s only?

THANX!!!

Thank you.

I copied and pasted a copy of the file I had in a CD, and it works fine. I don’t know what the problem was. Maybe it had to do with the compress option in powerpoint.

Your information is really good, though.

Thank you.

I copied and pasted a copy of the file I had in a CD, and it works fine. I don’t know what the problem was. Maybe it had to do with the compress option in powerpoint.

Your information is really good, though.

1. How do I “report” the name of the selected object in the main powerpoint window? something like “Windows(1).Selection.ShapeRange(1).Name.Type” ?

2. I did what you suggested, but…

In the animation “Timing / Triggers / Start effect on click of: “, I still get a rather meaningless list : ” rectangle 1, rectangle 2, oval 1,…” Is this good for writing code only?

Thank you

I love you guys!!!

Thank you!

I love you guys!!!

Thank you!

Perfect!

Which would be the easiest way to find the name of the object that triggers the animation? If I have a lot of objects in my slide it could be hard to find the right one. Is there an easy way to display the code name of any object?

Thank you

Perfect!

Which would be the easiest way to find the name of the object that triggers the animation? If I have a lot of objects in my slide it could be hard to find the right one. Is there an easy way to display the code name of any object?

Thank you

Thank you for your reply and suggestion.

Done…:

Set the default behavior of the Paste Options: Every time I paste some text into a text box , powerpoint defaults the text format to the initial default properties. An icon remains by the pasted text, which allows to select preserving the original copied text properties. I find this time consuming and would like to turn that feature off (at least for a while). I would like to paste or append the text to the pre-existing text with the original font propeties preserved, without having to do anything else.
Improving this feature would result in saving time doing repetitious copy/cut and paste, improved effectiveness and ease of use. Also less risk for RSI and eye strain.
Thank you

Thank you for your reply and suggestion.

Done…:

Set the default behavior of the Paste Options: Every time I paste some text into a text box , powerpoint defaults the text format to the initial default properties. An icon remains by the pasted text, which allows to select preserving the original copied text properties. I find this time consuming and would like to turn that feature off (at least for a while). I would like to paste or append the text to the pre-existing text with the original font propeties preserved, without having to do anything else.
Improving this feature would result in saving time doing repetitious copy/cut and paste, improved effectiveness and ease of use. Also less risk for RSI and eye strain.
Thank you

I will try your advice.

In the mean time, I wrote a short piece of code that did the trick:

Private Sub x_spacing_GotFocus()

Dim message As String
message = “If transpose direction is 1:” & vbCrLf
message = message & vbTab & “X spacing will set the control point spacing WITHIN the new ribs” & vbCrLf
message = message & vbTab & “Y spacing will define the distance among ribs” & vbCrLf
MsgBox message

End Sub

Its primitive, doesnt have the font formatting, and it is very annoying if you have to correct the values you typed in the textbox very often (the msgbox will pop up every time you select the textbox)… but it did the job too!

I have a high school degree in chemistry… does that help?

I will try your advice.

In the mean time, I wrote a short piece of code that did the trick:

Private Sub x_spacing_GotFocus()

Dim message As String
message = “If transpose direction is 1:” & vbCrLf
message = message & vbTab & “X spacing will set the control point spacing WITHIN the new ribs” & vbCrLf
message = message & vbTab & “Y spacing will define the distance among ribs” & vbCrLf
MsgBox message

End Sub

Its primitive, doesnt have the font formatting, and it is very annoying if you have to correct the values you typed in the textbox very often (the msgbox will pop up every time you select the textbox)… but it did the job too!

I have a high school degree in chemistry… does that help?

excellent observation and help!

excellent observation and help!