Adding Line numbers in Word

Hello All,

Currently on another project-will answer those AP questions later this week. :D

Have a problem.

In VS .NET I can add line numbers to the code, but when I copy and paste this code with line numbers into Word, the line numbers are not there.

How can I keep these line numbers to stay in Word?

PS. I know you can suppress line numbers/add line numbers in Word itself. I tried it via help. It is not easy to do, especially with multiple places in the document to add line numbers to.

Thoughts appreciated.

Also, will let you know about the little project I am working on at a later date.

Mr. C. :p

Try pasting it into notepad or wordpad first. Those programs won't try to manipulate your text before showing it to you.

Hello, this post was made with a 3rd party application for testing reasons.

Are you sure that when you copy from VS.NET it is actually copying the line numbers? To me it would make more sense for the line numbers to be added by the IDE and not really be text. But of course I don't have VS.NET so I don't know for sure :)

Quote:

---

Are you sure that when you copy from VS.NET it is actually copying the line numbers? To me it would make more sense for the line numbers to be added by the IDE and not really be text. But of course I don't have VS.NET so I don't know for sure

---

That what it is doing. It is there for printing purposes, not to the text. I guess I will have to add the line numbers in word. :(

Does VS.NET have a print to file option? And could word open that file? Just throw out ideas ;)

>I guess I will have to add the line numbers in word.
And you call yourself a programmer. :D Write a script to do it for you. ;)

Code:

---

#!/usr/bin/perl
#
# nladd
#  Add line numbers to a text file

use warnings;
use strict;

open LINES_FILE, ">lines" or die;

my $line_count = 1;

while (<ARGV>) {
  print LINES_FILE "$line_count $_";
  $line_count++;
}

---

Wouldn't that be techically screwed up if a certain line wraps? Unless when you copy it from the IDE, it carries along any new line characters.

or with PHP:

Code:

---

<?

$a_lines = file("sourcefile.cpp");
$line_count = count($a_lines);

$fp = fopen('sourcefile.cpp', 'w');

for ( $i = 0; $i < $line_count; $i++ )
{
        $content = "$i\t$a_lines[$i]";
        fwrite($fp, $content);
}

fclose($fp);

?>

---

>Wouldn't that be techically screwed up if a certain line wraps?
Not enough to warrant a fix for the simple use the script was designed for. ;)

@Mister C
Why don't you write yourself a nice little VBA macro in word, which you pass to it the name of the .c source file you want to quote from, and the range of lines you want to import, and it does all the hard work for you.

Even better, why not add magic comments to the 'C' source code so you don't have to refer to line numbers at all, but can refer instead to named sections of the code.

first get a real operating system :p , then do this

Code:

---

grep -n .\* in-file > out-file

---

behold the many powers of grep:D. Don't you just love linux?

Here is the result of some procrastination:

Code:

---

Sub ImportCode()
    Dim xlApp As Object, fso As Object, tstream As Object
    Dim nStart As Integer, nEnd As Integer, nLine As Integer
    Dim strLine As String
   
    Set xlApp = CreateObject("Excel.Application")
    strFile = xlApp.GetOpenFilename("C/C++ Source Files (*.c; *.cpp),*.c;*.cpp")
    xlApp.Quit
   
    If (strFile = False) Then Exit Sub
    nStart = CInt(InputBox("Please enter the start line.", "Start", 0))
    nEnd = CInt(InputBox("Please enter the end line.", "End", 999))
   
    Set fso = CreateObject("Scripting.FileSystemObject")
    Set tstream = fso.OpenTextFile(strFile)
   
    While (Not tstream.AtEndOfStream)
        strLine = tstream.ReadLine
       
        If (nLine >= nStart And nLine <= nEnd) Then
            Selection.Font.Color = wdColorBlueGray
            Selection.TypeText Format(nLine, "#000")
            Selection.Font.Color = wdColorAutomatic
            Selection.TypeText "  " & strLine & vbCrLf
        End If
       
        nLine = nLine + 1
    Wend

End Sub

---

Paste it into the VBA project and have fun.

Quote:

---

Originally Posted by Perspective

first get a real operating system :p , then do this

Code:

---

grep -n .\* in-file > out-file

---

---

That'll work in windows, too - with msys (includes a port of grep among others). :)

well looks like there have been 4 different methods posted...

Perl, PHP, grep, and VB...

now go at it!

Quote:

---

Originally Posted by DavidP

well looks like there have been 4 different methods posted...

Perl, PHP, grep, and VB...

now go at it!

---

hmmm, interesting that 4 non-C/C++ solutions were posted at the c-board. :eek:

Code:

---

#include <iostream>
#include <fstream>
#include <vector>
#include <string>

int main ( void )
{
        std::ifstream load ( "sourcefile.cpp" );

        std::vector < std::string > lines;
        std::string tempStr;

        while ( !load.eof() )
        {
                getline(load, tempStr);
                lines.push_back(tempStr);               
        }

        load.close();

        std::ofstream save ( "sourcefile.cpp" );

        for ( int k = 0; k < lines.size(); k++ )
        {
                save << (k + 1) << "\t" <<
                        lines[k] << "\n";
        }

        save.close();

        return 0;
}

---

Solves that problem...

Quote:

---

Originally Posted by Perspective

hmmm, interesting that 4 non-C/C++ solutions were posted at the c-board. :eek:

---

Hmm.. does that tell you anything about the worthiness of C/C++? ;)

Quote:

---

Originally Posted by ober

Hmm.. does that tell you anything about the worthiness of C/C++? ;)

---

It's so pure that to be spoken in this thread would dishonor it - and the speaker?

> Hmm.. does that tell you anything about the worthiness of C/C++?
It tells you that many people have a lot more tools in the toolbox than some one-dimensional being who swears 'x' is best for everything.

Salem is kickin'

(according to his reputation bars)

....

Meanwhile Prelude exudes kindness and good coding practice while Thantos apparently refers to himself as being special.

Just for the record I never rode ANY school buses!

RIGHT. Just short buses, huh? ;)

>Just for the record I never rode ANY school buses!

You poor soul. I'm sorry you missed out on the adventure.