#1
|
|||
|
|||
VBA detecting style used
Is it possible to write VBA code to detect the style currently used? I am creating a macro to insert and format a table and image caption, however the style used for these captions depend on where it is in the document e.g. the caption sits further in if there is a heading above, for paragraph text I have created an 'indented normal' style, so I am wanting the code to see the 'indented normal' and apply an 'indented caption' style. |
#2
|
||||
|
||||
Yes it is possible but you haven't provided enough information in order to create the code.
How is the macro going to work out which section it is in? The macro can look backwards or forwards to see if a certain piece of content is above or below it but we don't know what this logic is from what you described. The 'heading above' may be one or more paragraphs above and we don't know what the scope of that is yet. Maybe you should post a sample document showing what it is you want to achieve and what the styles are that should be factors
__________________
Andrew Lockton Chrysalis Design, Melbourne Australia |
#3
|
|||
|
|||
Hi Andrew, I am ok to apply a style, I just don't know how to write the code to determine what style is being used on the active selected text.
|
#4
|
||||
|
||||
It is pretty much the same way. At its simplest you could follow this pattern
Code:
Sub GetStyled() Dim sSty As String sSty = Selection.Style If sSty = "Normal" Then Selection.Style = "Heading 2" Else Selection.Style = "Heading 3" End If End Sub
__________________
Andrew Lockton Chrysalis Design, Melbourne Australia |
#5
|
|||
|
|||
Quote:
This is a self-testing function; drag the commented macro outside of the function then de-comment the macro. Run the test macro until it works, then make changes to the function and insert new test lines and rerun the test macro. Comment the macro and drag it back into the function. Cheers, Chris |
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
Need help detecting the reason for a strange behavior of a UDF | soroush.kalantari | Excel Programming | 9 | 08-12-2022 07:05 PM |
Detecting Write Access Password | azizrasul | PowerPoint | 0 | 04-05-2021 10:56 AM |
Detecting an active instance of Excel from Word VBA | Sorcerer13 | Word VBA | 17 | 06-02-2014 02:48 AM |
Detecting last cell within a block | Funk | Excel | 12 | 10-01-2013 04:26 AM |
detecting triggers | yisuz | PowerPoint | 1 | 05-15-2012 09:16 AM |