|
|
#6
01-12-2015, 09:48 PM
|
||||
|
||||
At its most basic you could use something like:
Code:
Sub Demo()
Application.ScreenUpdating = False
Dim StrAddr As String
StrAddr = Trim(InputBox("What is the Address of cell to update?", "Input Destination"))
On Error GoTo ErrExit
ActiveSheet.Range(StrAddr).Activate
ActiveCell.Value = "=SUM(B6:E6)"
ErrExit:
Application.ScreenUpdating = True
End Sub
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] 
|
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| What's wrong with my loop? | Irrma | Word VBA | 2 | 06-17-2014 06:25 AM |
| What's wrong with my code? | ksigcajun | Word VBA | 3 | 05-19-2014 06:42 AM |
| Wrong hyphenation | NobodysPerfect | Word | 1 | 02-04-2014 05:46 AM |
 Demo gone wrong
|
RyanNIF | Publisher | 1 | 10-19-2011 05:55 AM |
|
PLEASE HELP-wrong formatting????
|
bruce | Word | 10 | 04-10-2010 03:45 PM |
Windows 7 64bit 
Office 2010 32bit
Threaded Mode