home hardware prices news articles forums photos user reviews
Go Back   Tech Support Forums - TechIMO.com > TechIMO Community > IMO Community
Ask a Tech Support Question (free)!

Hello

Reply
Get bargains at  »  Dealighted.com
 
Thread Tools Search this Thread
Currently Active Users: 1823
Discussions: 203,411, Posts: 2,407,228, Members: 248,929
Old June 30th, 2009, 02:23 AM   Digg it!   #1 (permalink)
Junior Member
 
Join Date: Jun 2009
Location: Cochrane, Alberta CA
Posts: 2
Hello

Hello:

I have 44+ years in computers and electronics to include some programming. I am an American living in Alberta Canada. I was raised in Indianapolis, Indiana. Presently I work for the Deaf and Hard of Hearing Society as an Equipment Coordinator; in other words, I push paper. But I also get rewarded with helping those that are Deaf and Hard of Hearing obtain access to advanced technology to assist in their daily lives. Nothing like watching their faces split into a grin when they can hear sounds they had not heard in years.

I myself wear Oticon EPOQ digital Behind the Ear Hearing Aids. I can still hear without them, but I'm also a Vietnam Veteran and due to weapons fire have lost partial hearing between 800 and 4,000 Hz, or in the area of Critical Word Understanding, which is associated with female voices. I have a good reason to not hear my partner and she can't prove I heard her. I have all the bells and whistles that go with them as well. A bluetooth streamer that is paired to my iPhone, notebook, and television. When music or audio is received by the bluetooth this information is passed to my hearing aids. I can honestly say I hear voices and music in my head.

Anyway, I joined this forum as I need help with re-learning Visual Basic. Years ago I could do a decent job in VB6, but this VB 2008 Express edition is kicking me in the rear end.

I'm trying to learn how to use an sxternal VB program to open an EXCEL worksheet, search for defined data such as a part number, Part Item, Cost, etc and then place that information into an EXCEL Invoice. This information would also be exported into another EXCEL workbook for statistical data that must be submitted to the government on a monthly basis. It would save time looking up information, create lesser mistakes and create a single point of reference for changes.

To start myself off, I used the example from MSDN. I set up the form as outlined and copied the sample code from the tutorial. I also added the EXCEL Preferences as directed.

I am sure most of you have seen the code so I will only add where my problem is.

__________________________________________________
PrivateSub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim oXL As Excel.Application
Dim oWB As Excel.Workbook
Dim oSheet As Excel.Worksheet
Dim oRng As Excel.Range
' Start Excel and get Application object.
oXL = CreateObject("Excel.Application")
oXL.Visible = True

' Get a new workbook.
oWB = oXL.Workbooks.Add <------- I get a Missing Exception Error here.

oSheet = oWB.ActiveSheet

'Add table headers going into cell by cell.
oSheet.Cells(1, 1).Value = "First Name"
oSheet.Cells(1, 2).Value = "Last Name"
oSheet.Cells(1, 3).Value = "Full Name"
oSheet.Cells(1, 4).Value = "Salary"
'Format A1:B1 as bold, vertical alignment = center.
With oSheet.Range("A1", "D1")
.Font.Bold = True

.VerticalAlignment = Excel.XlVAlign.xlVAlignCenter <---- Here I get an error that XlVALign is not part of EXCEL.
EndWith

'Create an array to set multiple values at once.
Dim saNames(5, 2) AsString
saNames(0, 0) = "John"
saNames(0, 1) = "Smith"
saNames(1, 0) = "Tom"

__________________________________________________ ______

Has anyone seen this error before?

Any help would be greatly appreciated as I need to move forward with this project.

Tony
awparran is offline   Reply With Quote
Old June 30th, 2009, 04:36 AM     #2 (permalink)
Not an OWO yet, just OLD!
 
sharder8's Avatar
 
Join Date: Oct 2001
Location: Uh, Central Oregon
Posts: 5,991
Blog Entries: 1
Welcome to TIMO awparran, from the Folding@Home Team 111!


Harder
__________________
* NOSCE TE IPSUM *
* NOLI ME TANGERE *


TechIMO Folding@home Team #111 - Crunching for the cure!
sharder8 is offline   Reply With Quote
Old June 30th, 2009, 05:38 AM     #3 (permalink)
Junior Member
 
Join Date: Jun 2009
Location: Cochrane, Alberta CA
Posts: 2
Thanks

Thanks for the welcome.
awparran is offline   Reply With Quote
Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search


Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)
 
Most Active Discussions
Is It Just Me? (3680)
Superbowl commercials (The green po.. (10)
Assosiations (22753)
Need for Speed Shift (7)
Motherboards with 2 PCIE x16 slots (8)
I want to buid a pc with this case (14)
[F@H Chat]2/6/10 New thread for ya'.. (17)
Graphene transistors promise 100GHz.. (7)
Animated GIFs don't animate? (13)
hunting for new graphics card (9)
Upgrading (5)
Upgrading Video (28)
Cl4 vs. Cl5 Memory (11)
RAM Frequency (6)
Recent Discussions
rsync over passwordless ssh in a cron.. (4)
Is my hard drive going bad? Please h.. (0)
HD5870 Question (15)
Wii at buy.com for $374 - Carnival Sm.. (7)
New PC Heavy Gaming Rig (2)
should i upgrade whole pc or just vid.. (1)
Need for Speed Shift (7)
One dumb nube and a cisco 3550 (0)
Deleted email addy keeps bouncing bac.. (1)
Laptop - HDTV Connection Using HDMI C.. (1)
Video Format Total Solution: How to C.. (0)
How Good is This $450 MSI Laptop? (2)
GPU upgrade from 8600 GT (1)
[F@H Chat]2/6/10 New thread for ya' s.. (17)
wireless connectivity (0)
My 9400GT's fan is screwy (2)
Graphene transistors promise 100GHz s.. (7)
SpeedFan Temp Monitor Help (1)
120mm fan on top of case??? (11)
Question about multiple monitors (3)
I bet you can't fix Bios! (4)
HP Pavillion dv1000 with Windows Xp w.. (1)
Initializine a SATA drrive (1)
disappearing icons *different problem.. (1)
Alert Box - One or more of the includ.. (3)


All times are GMT -4. The time now is 09:23 AM.
TechIMO Copyright 2009 All Enthusiast, Inc.



1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28