|
[x]
Posted via EE Mobile
|
||
Search, ask, and monitor your questions on the go with EE Mobile. Visit Experts Exchange from your mobile device and never be out of touch again. |
||
| Question |
|
[x]
Attachment Details
|
||
|
[x]
The Solution Rating System
|
||
With so many solutions, how can you tell which solutions are most likely to help you and which ones are not? To provide you with a tool to use, we rate our solutions based on various elements that most accurately determine if a solution is a quality solution. To explain what factors affect the solution rating, here are the elements we take into consideration when formulating our solution rating.
Your Input Matters If you have any suggestions that you would like to make for our rating system, please ask a question in the Suggestions Zone of Community Support. Thank you! |
||
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: 29: 30: 31: 32: 33: 34: 35: 36: 37: 38: 39: 40: 41: 42: 43: 44: 45: 46: 47: 48: 49: 50: 51: 52: 53: 54: 55: 56: 57: 58: 59: 60: 61: 62: 63: 64: 65: 66: 67: 68: 69: 70: 71: 72: 73: 74: 75: 76: 77: 78: 79: 80: 81: 82: 83: 84: 85: 86: 87: 88: 89: |
current macro
Sub TransferToPurchaseSpreadsheet()
'
' TransferToPurchaseSpreadsheet Macro
' Dim fName As Range
' Application.Goto Reference:="PURCH"
' Range("PURCH").Select
' fName = Range("PURCH")
'Copies a range from file XYZ (loadcurve).
Range("C17:F21").Select
Selection.Copy
'Print printfName
'Goes to the already open file ABC (purchase).
'Where "ABC" is the purchase spreadsheet whose file name is ABC today,
'but will be DEF tomorrow, and something else every day afer. The file
'name is located in cell Sheet1!G1, with a defined range name called PURCH,
'How can I reference the file name (whatever it is) found in cell Sheet1!G1
'and use it as a variable in the statement below? Or in another statement that
'does something similar...that is, move my cursor to file ABC so I can paste
'the data.
' Windows("fName").Activate
Windows("ABC.xls").Activate
'Paste the data in file ABC (purchase).
Range("E12").Select
ActiveSheet.Paste
Range("A1").Select
Application.CutCopyMode = False
'Goes back to the file XYZ (loadcurve).
Windows("XYZ.xls").Activate
'Range("A1").Select
'Both files ABC and XYZ are already open.
'Don't want to reopen either file using the macro.
'Don't want to save either file using the macro.
'Don't want to close either file using the macro.
End Sub
|
Advertisement
| Hall of Fame |