Data Entry from Caliper into Excel

[supernova5271]

Hello Guys,

I have an excel sheet which measures 4 different variables (lenght, widht, height and weight) for each subject and there are 100 subjects. The measurements are read into the excel sheet directly using the winwedge program which is the middle man between the measuring instruments and the excel sheet. My current set has been a Windows 2000 and office 2003. My macro was set up such that after every measurement the cursor would automatically move right to the next cell and so on till all four measurements are done for each subject.
The problem is I recently upgraded to XP and office 2007 and I now get errors.
After every measurement the cells shift by 2 instead of 1 as it was doing before.

I am not sure what the fix is for this problem.

ANy help will be greatly appreciated.

Thanks,

[Palmetto]

Post your macro code so someone can take a look or post the workbook with the code (after removing any sensitive data).

[supernova5271]

The macro code is as follows:

Sub ResetCurrentSelectedCellFormat()
Dim sValue As String
Dim r As Range
Dim lCount As Long

lCount = Selection.Count
Application.ScreenUpdating = False
For Each r In Selection
Application.StatusBar = lCount
sValue = r.Value
r.Value = sValue
lCount = lCount - 1
Next r

SendKeys "^{HOME}", False
ActiveWindow.ScrollRow = 1
Application.ScreenUpdating = True
Application.StatusBar = False
End Sub

[royUK]

Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code. Posting code without them makes your code hard to read and difficult to be copied for testing. Highlight your code and click the # at the top of your post window. For more information about these and other tags, found here

Your post does not comply with Rule 5 of our Forum RULES. We have Seven question forums: Miscellaneous, General, Programming, Worksheet Functions, Charting, Excel 2007 Help and New Users. Please choose the appropriate forum, and post your question in ONLY one forum.

[Caliper2PC]

Hi guys,

The Caliper2PC software has an Excel interface with many useful features. The hardware is compatible with the inexpensive Chinese calipers as well as with Mitutoyo Digimatic calipers. A foot switch for hands-free capturing of the values can be connected.

The Caliper2PC software is freeware and can be downloaded and tested here.
It contains a "Virtual Interface" so all features can be evaluated without the hardware.

For writing values into Excel, you have to launch Excel from the Caliper2PC software:

"Output" -> "Excel" -> "Launch Excel"

After launching Excel from the Caliper2PC software you can choose a cell in any sheet (eg. Sheet1) and right click on it to open the context menu.

From the context menu you choose "Set Origin Cell" for defining the first cell to be written to. For more features (for example painting cells with max / min values) you can open the "Caliper2PC - Excel" window.

enjoy,
Caliper2PC

[topomax]

Hi,

To control my Mitutoyo Digimatic calipers we use Bill Redirect software (35$ for the full version)... I love this solution because the communication with Excel is direct via DDE (also support wedge keyboard and direct to file). With this solution you can easely control the position in Excel ! In wedge keyboard mode you can specify the keyboard action before and after the data received from the caliper (prefix and sufix)... Example in sufix you can enter {TAB}{ENTER}

You can also add a rule with an action depending of the value received.


Web page: http://www.billproduction.com/Digita...tal/index.html
Manual: http://www.billproduction.com/Bill_R...se_digital.pdf

A free trial version is available to do your test !

Paul