I have created a file on a 24" iMac, but when i open it on a smaller laptop the cell sizing is not the same and i cannot see the full cells or the numbers in it which is difficult, because i have someone else working on the file and i have it locked so they can't see the data unless i unlock the sheet which is something i don't want to do.
View 4 Replies
Here's my number 20512202250
The first 4 digits are the shop #
The last 7 digits are the part #
I had to split the number to separate shop and part
I used LEFT(a2, LEN(a2)-7) for the shop which gave me 2051
I used REPLACE (a2,1,4,"") to get the 2202250 part number
My next column is an ISNUMBER formula
When I do an ISNUMBER to 2202250, it's coming back FALSE like it's showing it NOT to be a number.
How do I get the 2202250 to show up as a number?
If I change it manually, the ISNUMBER formula works correctly and reads it as a number.
I have a condition setup (under "This Workbook") upon opening a spreadsheet to verify a computer's predetermined motherboard serial number that will shut the Excel workbook down if the numbers do not match. This works fine. What I'd like to do is to add a second condition that will allow a password to be entered in a textbox if the numbers do not match so that the serial number condition could be manually overridden, if necessary. If the serial number and the password are incorrect the workbook automatically closes.
Here is the code that works:
Private Sub Workbook_Open()
If CreateObject("Scripting.FileSystemObject").GetDrive("C:").SerialNumber "-XXXXXXX" Then ActiveWorkbook.Close False
End Sub
Here is what I am attempting to do that is not functioning properly - need to add a textbox to enter a password to override an incorrect serial number
Private Sub Workbook_Open()
If CreateObject("Scripting.FileSystemObject").GetDrive("C:").SerialNumber "-XXXXXXX" Then
Dim Rng
Rng = InputBox("aaaaaa")
If Rng "aaaaaa" Then ActiveWorkbook.Close False
End Sub
I am trying to make a little game for a friend of mine. It picks a random number 1-1000 then he gets 10 chances to guess the number. After each guess, it tells him if the number is higher or lower. I have a userform that you put it your first guess, hit a button, and it tells you if the number is higher or lower. All the guess blanks and buttons are on the same UserForm. However, after you push the first button, the UserForm doesn't work anymore. How do I get it to stay functional the whole time?
View 9 Replies View RelatedI have a code in my macro to create a new worksheet. As soon as I run it, it takes me to the new worksheet. How do I stay on my current sheet instead of jumping all over the place?
View 1 Replies View RelatedI need to open all files in a folder to modify a date in the first line. The files have a .cdr extn for a particular application but are basically text files with xml type tags. What would be the best way to proceed?
I tried opening as text in VBA but they are blank.
I am having problems to read a number inside a .txt file.
I use this code to open a .txt
Workbooks.OpenText filename:=data_DMC_filename _
, Origin:=xlWindows, StartRow:=1, DataType:=xlDelimited, ConsecutiveDelimiter:=False, Tab:=True, Semicolon:= _
False, Comma:=False, Space:=False, Other:=False, FieldInfo:=Array(Array _
(1, 1), Array(2, 1)), DecimalSeparator:=",", ThousandsSeparator:=".", _
TrailingMinusNumbers:=True
At original file the number is like this format: 003791689000011403700010, but after opening as workbook it is like this 3,7917E+21
I tried changing the forma to text with this code bellow, but it looses information
Selection.NumberFormat = "0"
and the result is: 3791689000011400000000
I already wrote a lot of my code for other values, using this Workbooks.OpenText command, opening as workbook so I would not like to open the file in text format or so...
Apparently my program quits after i try to open an excel file. If you open the file manually you get an error upon opening the file...something like this:
"File you are tyring to open is in a different format than specified by the file extension".
The problem is i am using an excel macro using VBA and once the file is opened the VBA execution quits.
The excel file turns out to be an xml file which excel can open the file and have the VBA continue running if i RENAME the file with an "xlsx" extension. The problem is that i cant ask the user to rename the file.........how do i get VBA to open the file without an issue?
I need to place a date and time in a cell 14/9/2013 6:00 PM
Tried several formats under custom format without success.
Also need addition to following macro to enable it to start on opening of workbook
Code:
Sub Macro1()
Do
PauseTime = 1 ' Set duration.
Start = Timer ' Set start time.
Do While Timer < Start + PauseTime
DoEvents ' Yield to other processes.
[Code]...
I have a need to open a file from my companies intranet. My current method was to open said file via the method that the recorder gave me. However, I would like ot be able to open a said file without having to start open another workbook.
This is the path:
[url]
So the command is this:
Workbooks.Open [url]
Links are not actual links
So what I need to know. Is how can I open this file without opening a workbook. I haven't been able to use the VB "Open Statement" to open a file and I don't believe that I've been successfull using the Filesystem object either.
Is there a code available that can be used to get the user's computer ID number (Not Computer Name)? I'm using a password generator to randomly generate a password and I would like to use this unique password with the user's Computer ID.
View 9 Replies View RelatedI have a problem running an excel macro on different laptops because the IP needs to be known (my program links to databases that are installed on a "server" laptop). The IP can be sourced by using the "Start, Run, cmd, ipconfig" but my users can have problems with process.
Does anyone know of a vb function that will display the ip of the computer that the code is run on?
a macro to get the computer ID of the computer where the excel file is opened?
View 9 Replies View Relatedi am experiencing runtime error '6': overflow on one computer but not on another computer when it is the exact same file running on two different computers.
Is there a code or formula to get the name of my Computer?
View 9 Replies View RelatedIs there any way to return the name of the computer in Excel using VB?
Does anyone have a macro that could assign a 16-digit number, seperated by dashes, to a computer? (i.e. Computer ID: xxxx-xxxx-xxxx-xxxx)
View 9 Replies View RelatedHere's the scenario. A co-worker and I access the same file from the same online database and download it in the same manner. We have the same version of excel. We then open these identical files, we run a formatting macro (identical), but when it comes time to set the page breaks in order to get the items to print on the same page I have to increase a columns width to make it fit on one page and yet it still doesn't match theirs. It appears to have a different scale but I'm not sure of the option difference between our machines. I don't know how it could be the printer since it physically gives her different page break option than what mine does.
View 1 Replies View RelatedI have a Age calculating formula in an excell cell, which calculates the age as on another date.
The forumala is =IF(E4="","",IF($C$1="","",ROUNDDOWN(($C$1-E4)/365,0))) where E4 is the date of birth and C1 is the date in which I want the age calculated to be.
The above formula works very well on my computer, but does not on any other computer. If I access it from my sent items or from a shared drive, it works perfectly on mine, but not on any other computer!!! I get a #value error message on all other computers.
I have tried the foll:
If i enter =ISNUMBER(C1) where the age has to be calculated, I get #Name?
If I enter =ISNUMBER(E4), i get TRUE
The above is on the sheet where it does not work ( on others computer ) and i get TRUE for both on mine. Also both have the same date formats and same time zones...
I am having trouble with transferring a Macros to another computer. I have saved and sent the file via e-mail as a .xls and .xlsm to no avail and tried other methods of transferring the macros to the other computer. Also No I cannot copy paste the coding information to the other computer since there are multiple macros buttons since they are add one item and subtract one item from separate rows for inventory at a warehouse (about 100+ rows x 2 = about 200+ macros buttons).
View 1 Replies View RelatedI have few macros that I use to reconfigure a particular workbook into a sort of "developer mode". I keep them in a text file that I can paste them from when I'm working on it and then delete them before I send it out to other people.
I'd like to be able to script them so they only run if the workbook is open on a specific machine (namely mine). Is there any way to identify the specific computer a spreadsheet is being run on?
I want to transfer my Excel-icons. Some of them are custom buttons where I have added user-defined functions. Is there any way I can do this? A list of icons with their function or purpose is OK as well.
View 4 Replies View RelatedI have a odd problem. I have workbook that I made I placed this formula in cell A1
View 3 Replies View RelatedI have made a program using excel vba with userforms, however upon using it on another or any computer with the same version of Office(2007) i am getting a debugging error and highlighting any lines with the words "format" & "date" in the vba code.
View 3 Replies View RelatedI created a code and I just changed computer. The code that was working perfectly fine on my previous laptop is no longer working now.
Workbooks.Add
ActiveWorkbook.SaveAs Filename:= _
"C:UsersUserDocumentsBCB MANAGEMENTBankArchiveData_TenantsData_Tenants_" & Left(strDate, 8) _
, FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
Set wbData = Workbooks("Data_Tenants_" & Left(strDate, 8))
When it reaches Set wbdata it says subscript out of range. I'm not sure how it cannot recognise the spreadsheet I just created and that is open and working.
I have code below that works well most of the time. One of the cases below will not work. It insists on requiring a name and password.
(note: it is the only Windows 2000 operating systems)
I want to enter this in my case line to automatically add the username and password.
Let's say the username is: "dave" and the password is: "happy"
How can I add this to this part of the code?
Case "DJ"
strfilename = "\DAVEJONESDavesProposals" & strfilename
Sub Save_and_SaveSalesman()
Dim strPath As String, strPath2 As String, CurrPath As String
Dim WB1 As Workbook
Dim WB2 As Workbook
Using some custom VB code to put the filename of the document into a cell.
I save the spreadsheet and load it up on another computer and all I get is #VALUE.
How do I fix this so its loaded on every machine without problems? (Multiple people will be using these sheets)
I've a workbook (XL 2003) test-1.xls, and I need to restrict it to a specific computer with ID: my-a1234567k
(shown under ControlPanel::System::Computer Name::Full computer name).
Is it possible to code such restriction in the w/b Open() event to prevent opening the w/b on a different computer?
My computers each has a different OS (Win 2000, Win XP Home, Win XP Prof ), different Excel version (XL 2000, 2003, 2007), etc., and the majority of my workbooks have been developed and would work only in certain environment (e.g.; in XL 2003 only, or XL 2007 only, ... ).
I'm running Excel 2007 with Windows Vista. I also have Excel 97, which I was told would not run with Vista. I've since discovered that many programs that I was told wouldn't run with Vista seem to work fine.
Is it possible to install Office 97 on the same machine with Office 2007?
I wrote some code that runs with no problem on my computer as well as another coworkers computer, but will not work on a 2nd coworker's computer. The "subscript out of range" error shows up at the point when the EMInput worksheet in the EMInput workbook is copied to the new workbook called "Out of Plane Section Cuts" (SEE BELOW). Is there an option in EXCEL or somewhere that could affect this. I don't see why you would get a subscript out of range error since the EMInput workbook is open....
View 9 Replies View Related
