[eener1116]

Help! I had to buy a USB memory stick for my English class and now it won't
let me save or delete files on it. It has a 1GB capacity and I have less
than 1MB on it right now so that's not the problem. I have searched for a
place to remove write protect but no luck. It's driving me crazy and this is
the only way my professor wants us to submit our essay's. It worked just
fine a couple of days ago and then my MS Word program locked up (as it is
prone to doing) and ever since then I've had this problem. Thank you!

[Suzanne S. Barnhill]

Don't try to save directly from Word. Save to the HD, then copy to the
stick.

--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA
Word MVP FAQ site: http://word.mvps.org
Email cannot be acknowledged; please post all follow-ups to the newsgroup so
all may benefit.

"eener1116" wrote in message
...
Help! I had to buy a USB memory stick for my English class and now it
won't
let me save or delete files on it. It has a 1GB capacity and I have less
than 1MB on it right now so that's not the problem. I have searched for a
place to remove write protect but no luck. It's driving me crazy and this
is
the only way my professor wants us to submit our essay's. It worked just
fine a couple of days ago and then my MS Word program locked up (as it is
prone to doing) and ever since then I've had this problem. Thank you!

[Graham Mayor]

The following macro added to a toolbar button will save the document and
copy to your flash drive. Change the drive letter in the macro from Q to
whatever your flash drive letter happens to use. You can configure Windows
to always assign that letter to your flash drive.

http://www.gmayor.com/installing_macro.htm


Sub CopyDocToFlash()
Dim strFileA As String
Dim strFileB As String
Dim strFlash As String
ActiveDocument.Save 'save the original

strFileA = ActiveDocument.Name 'saved original document name
strFlash = "Q:\" & strFileA 'flash drive filename
' after closing backup file, copy it to USB flash drive
ActiveDocument.Close 'close the document
On Error GoTo Oops
FileCopy strFileA, strFlash 'Copy source to flash
Documents.Open strFileA ' Reopen the document
End
Oops:
If Err.Number = 61 Then 'error trap for missing flash drive.
MsgBox "Disc Full! The partial file created will be deleted", vbExclamation
Kill strFlash
Else
MsgBox "The flash drive is not available", vbExclamation
End If
Documents.Open strFileA
End Sub


--

Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org



Suzanne S. Barnhill wrote:
Don't try to save directly from Word. Save to the HD, then copy to the
stick.


"eener1116" wrote in message
...
Help! I had to buy a USB memory stick for my English class and now
it won't let me save or delete files on it. It has a 1GB capacity
and I have less than 1MB on it right now so that's not the problem.
I have searched for a place to remove write protect but no luck.
It's driving me crazy and this is the only way my professor wants us
to submit our essay's. It worked just fine a couple of days ago and
then my MS Word program locked up (as it is prone to doing) and ever
since then I've had this problem. Thank you!