Please convert it to c#

chetan Allipur

9y1.3kVisual Basic .NET

Here is VBA Code

If Right(Trim(ActiveDocument.Bookmarks("\HeadingLevel").Range.Paragraphs(hNumb).Style), 6) = "NoNumb" Then

h_prefix = sGetDocVar("CTDPrefix")

SetDocVar "TablePrefix", "Table " & h_prefix & "."

t_prefix = sGetDocVar("TablePrefix")

hNumb = "-"

Else

h_prefix = sGetDocVar("CTDPrefix")

SetDocVar "TablePrefix", "Table " & h_prefix & "."

t_prefix = sGetDocVar("TablePrefix")

End If

I want same working Functionality in c#. Please send me back c# code

17 Replies

Know the answer? Post it — somebody with the same question will find it here.

Manikandan Murugesan9y ago
Automatic conversion isn't possible at the moment, but doing it manually will also help improve your C# skills. There's a Top 10 article here that takes you through the common differences
Refer thr following links : https://msdn.microsoft.com/en-us/library/ms228286.aspx
https://msdn.microsoft.com/en-us/library/aezdt881.aspx
https://msdn.microsoft.com/en-us/library/aa164018(office.10).aspx
Abhishek Srivastava9y ago
1. if ((ActiveDocument.Bookmarks("\\HeadingLevel").Range.Paragraphs(hNumb).Style.Trim().Substring((ActiveDocument.Bookmarks("\\HeadingLevel").Range.Paragraphs(hNumb).Style.Trim().Length - 6)) == "NoNumb")) {
2. h_prefix = sGetDocVar("CTDPrefix");
3. SetDocVar("TablePrefix", ("Table "
4. + (h_prefix + ".")));
5. t_prefix = sGetDocVar("TablePrefix");
6. hNumb = "-";
7. }
8. else {
9. h_prefix = sGetDocVar("CTDPrefix");
10. SetDocVar("TablePrefix", ("Table "
11. + (h_prefix + ".")));
12. t_prefix = sGetDocVar("TablePrefix");
13. }
chetan Allipur9y ago
In this your code

var style = ActiveDocument.Bookmarks("\\HeadingLevel").Range.Paragraphs[hNumb].Style;
var styleString = style.ToString().Trim();
if (styleString.Length >= 6 && styleString.Substring(style.Length - 6) == "NoNumb")
{

I am getting error in Style it is not proper property.
chetan Allipur9y ago
Hi Mani Kandan,

I will check that code.

I have one more issue but this is different.

I am getting issue like this "Item with specified name does not exist."
my code

Selection wordsec = Globals.ThisAddIn.Application.Selection;

if (sTextSz == "10")
{
object Text10 = "TableText10";
wordsec.set_Style(ref Text10);
}
else if (sTextSz == "9")
{
wordsec.set_Style("TableText9");
}
else
{
wordsec.set_Style("TableText8");
}

Please anyone send me the code in VSTO word
Abhilash J A9y ago
Hi Chetan,

I have edited my answer, try it now. And Looks like VB was automatically performing a ToString() while c# was not. Fixed code.

Cheers!!!
chetan Allipur9y ago
Hi RajKiran,

It is not convering. I tried
Rajkiran Swain9y ago
You can use http://converter.telerik.com/ site for converting your code .
chetan Allipur9y ago
Yes I used your code but. Inside if condition it is not going.In Immediate window i checked its is showing value as "object"
chetan Allipur9y ago
Yes I am getting error. like below

System.__ComObject' does not contain a definition for 'Trim'
Abhilash J A9y ago
Hello,

try like this
var style = ActiveDocument.Bookmarks("\\HeadingLevel").Range.Paragraphs[hNumb].Style;
var styleString = style.ToString().Trim();
if (styleString.Length >= 6 && styleString.Substring(style.Length - 6) == "NoNumb")
{
    //rest of your code
Or,
string bookMark = ActiveDocument.Bookmarks("\\HeadingLevel").Range.Paragraphs(hNumb).Style.ToString();
if (bookMark.Trim() == "NoNumb") {
    h_prefix = sGetDocVar("CTDPrefix");
    SetDocVar("TablePrefix", "Table " + h_prefix + ".");
    t_prefix = sGetDocVar("TablePrefix");
    hNumb = "-";
} else {
    h_prefix = sGetDocVar("CTDPrefix");
    SetDocVar("TablePrefix", "Table " + h_prefix + ".");
    t_prefix = sGetDocVar("TablePrefix");
}
Cheers!!!
Anil Jha9y ago
1. if (sGetDocVar("CTDPrefixTandF") == "3")
2. {
3. hNumb = doc1.Bookmarks["\\HeadingLevel"].Range.Paragraphs[1].Range.ListFormat.ListLevelNumber.ToString();
4. if (hNumb == "1")
5. {
6. if ((doc1.Bookmarks["\\HeadingLevel"].Range.Paragraphs[int.Parse(hNumb)].get_Style().ToString().Trim().Substring((doc1.Bookmarks["\\HeadingLevel"].Range.Paragraphs[int.Parse(hNumb)].get_Style().ToString().Trim().Length - 6)) == "NoNumb"))
7. {
8. h_prefix = sGetDocVar("CTDPrefix");
9. sGetDocVar("TablePrefix", "Table " + h_prefix + ".");
10. t_prefix = sGetDocVar("TablePrefix");
11. hNumb = "-";
12. }
13. else
14. {
15. h_prefix = sGetDocVar("CTDPrefix");
16. sGetDocVar("TablePrefix", "Table " + h_prefix + ".");
17. t_prefix = sGetDocVar("TablePrefix");
18. }
19. }
20. else
21. {
22. h_prefix = sGetDocVar("CTDPrefix");
23. sGetDocVar("TablePrefix", "Table " + h_prefix + ".");
24. t_prefix = sGetDocVar("TablePrefix");
25. }
26. }
Use this code and let me know if it works

chetan Allipur9y ago

This is error I am getting.

Error CS1545 Property, indexer, or event 'Paragraph.Style' is not supported by the language; try directly calling accessor methods 'Paragraph.get_Style()' or 'Paragraph.set_Style(ref object)'

Here is my code.

if (sGetDocVar("CTDPrefixTandF") == "3")
{
hNumb = doc1.Bookmarks["\\HeadingLevel"].Range.Paragraphs[1].Range.ListFormat.ListLevelNumber.ToString();
if (hNumb == "1")
{
if ((doc1.Bookmarks["\\HeadingLevel"].Range.Paragraphs[int.Parse(hNumb)].Style.Trim().Substring((doc1.Bookmarks["\\HeadingLevel"].Range.Paragraphs[int.Parse(hNumb)].Style.Trim().Length - 6)) == "NoNumb"))
{
h_prefix = sGetDocVar("CTDPrefix");
sGetDocVar("TablePrefix", "Table " + h_prefix + ".");
t_prefix = sGetDocVar("TablePrefix");
hNumb = "-";
}
else
{
h_prefix = sGetDocVar("CTDPrefix");
sGetDocVar("TablePrefix", "Table " + h_prefix + ".");
t_prefix = sGetDocVar("TablePrefix");
}
}
else
{
h_prefix = sGetDocVar("CTDPrefix");
sGetDocVar("TablePrefix", "Table " + h_prefix + ".");
t_prefix = sGetDocVar("TablePrefix");
}
}

Anil Jha9y ago

Can you paste here error details that you are getting while compliling, Also paste the code that you are compiling.

chetan Allipur9y ago

Now Error is coming in Paragraphs(hNumb).Style. Style propery is not there. Style coming error

Anil Jha9y ago

Try this code

if ((ActiveDocument.Bookmarks("\\HeadingLevel").Range.Paragraphs(hNumb).Style.Trim().Substring((ActiveDocument.Bookmarks("\\HeadingLevel").Range.Paragraphs(hNumb).Style.Trim().Length - 6)) == "NoNumb")) {
h_prefix = sGetDocVar("CTDPrefix");
SetDocVar("TablePrefix", ("Table "
+ (h_prefix + ".")));
t_prefix = sGetDocVar("TablePrefix");
hNumb = "-";
}
else {
h_prefix = sGetDocVar("CTDPrefix");
SetDocVar("TablePrefix", ("Table "
+ (h_prefix + ".")));
t_prefix = sGetDocVar("TablePrefix");
}

chetan Allipur9y ago

Hi Anil,

I am getting error in Strings.Right,Strings.Trim and Paragraph[hNumb].Style. Here style property not there. These three place error is coming

Anil Jha9y ago

if (Strings.Right(Strings.Trim(ActiveDocument.Bookmarks("\\HeadingLevel").Range.Paragraphs(hNumb).Style), 6) == "NoNumb") {
h_prefix = sGetDocVar("CTDPrefix");
SetDocVar("TablePrefix", "Table " + h_prefix + ".");
t_prefix = sGetDocVar("TablePrefix");
hNumb = "-";
} else {
h_prefix = sGetDocVar("CTDPrefix");
SetDocVar("TablePrefix", "Table " + h_prefix + ".");
t_prefix = sGetDocVar("TablePrefix");
}