Εκκίνηση του Microsoft Office Excel , κάντε κλικ στην καρτέλα "Προγραμματιστής " και κάντε κλικ στο " Visual Basic " για να ανοίξετε το παράθυρο επεξεργασίας VB . . Κάντε κλικ στο "Εισαγωγή" μενού και κάντε κλικ στο " Ενότητα " για να προσθέσετε μια νέα λειτουργική μονάδα κώδικα 2
Δημιουργήστε μια νέα διαδικασία ρουτίνας :
Private Sub copyString ( )
με 3
Προσθέστε τον ακόλουθο κώδικα για να αντιγράψετε το string στην Α1 :
Range ( "A1" ) Επιλέξτε
Selection.Copy
Η 4 <. p > Επικόλληση το string αντιγράφονται σε B1 : .
Range ( " B1 " ) Επιλέξτε
ActiveSheet.Paste
5
Τύπος " End Sub " για να τερματίσετε την sub διαδικασία . Πατήστε το πλήκτρο " F5 " για να εκτελέσετε τη διαδικασία .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα