fumei, you are correct except that cx will all have data until the end of the list. The "until the cell in C is empty" means that the loop would stop once it hits an empty cell in C. Sorry for the confusion...
Thanks in advance for any resolution!
Hello, I am wondering if anyone has a script that will look for the contents of one cell in a list of other cells. For example: In cell C2 I have a 10 digit phone number. In column E, I have a list of phone numbers ranging from E2:E100. What I would like to do is take the number in C2 and look...
Here's the whole script. It is used to randomize a list of participants based on column with continuous data. I have the cell defined, but I would like to get away from the ActiveCell.Offset(0, 29).Value = RandomNumber and have the number entered by user to replace the 29...
Hello,
I have this do until loop in my script:
'=========================================================
Range(cellchoice).Select
Do Until ActiveCell.Value = Empty
ActiveCell.Offset(0, 29).Value = RandomNumber
ActiveCell.Offset(1, 0).Select
Randomize...
I will omit the OverWriteFiles declaration...the problem seems to be that I am trying to copy over a set of subfolders to the N:\Origin\ folder. Anyone know what am I missing to accomplish this?
I have this script and I am getting an error when trying to move the folders to the new location...anyone have any suggestions?
'================================================
'Option Explicit
'On Error Resume next
Dim objNetwork
Dim objFso
Dim objFolder
Dim FromShare
Set objFso =...
One more issue with this script...
I am getting a permission denied error on the:
oFile.Delete(True)
If I run the script on the parent folder, it works fine, but when I try to use it for the sub-folders, I get the error?!? Any suggestions or a way to override this error?
So, I have the script below and it is working except when I added the "For Each oSubFolder In oFolder" statement, I am getting the error returned:
Line: 13
Char: 1
Error: Object doesn't support this property or method
Code: 800A01B6
Source: Microsoft VBScript runtime error
Line 13 is the For...
Here's what I have so far. I can delete the files based on age from today, but I am looking to delete them based on size instead.
==========================================================
iDaysOld = 0
Set oFSO = CreateObject("Scripting.FileSystemObject")
sDirectoryPath = "C:\Calls\"
set...
Hello,
I am looking for a script that will delete any file in a folder and it's sub-folders that are 100kb or smaller.
Thanks in advance for any assistance with this script.
Hello,
Does anyone have a VBScript that will go to a directory and prompt to rename a folder that already exists?
Example:
I have a folder named "Test1". After I do a file move and deletion, I want to get a prompt that identifies the "Test1" folder and asks for the folder to be renamed...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.