دەرىس Excel دا سانلىق مەلۇمات ئۆزگەرسە خاتىرىسنى سا ...mp3

دىتال8

3d
" [5 K9 y9 r& n
- x3 l9 B. I( N& j! C* jمەلۇم بىر كاتەكچىگە 100نومۇرنى كىرگۈزدىڭىز دەيلى. كېيىن بۇ نومۇرنى 60كە ئۆزگەرتسىڭىز ئۆزگەرتكەن ۋاقىت ۋە قايسى نومۇرنىڭ قايسى نومۇرغا ئۆزگەرتىلگەنلىكىنىڭ ساقلىنىپ قېلىشىنى خالامسىز؟
ئۇنداقتا ئاۋال سىز سانلىق مەلۇمات كىرگۈزىدىغان Excel جەدۋېلىنى ئاچىسىز، كېيىن 查看代码 نى ئېچىپ بۇ كودنى چاپلايسىز.
4 f" y7 r7 n& h+ I" N1 I( S* V: l

1. Dim XX
   / h& O/ C1 c" ~# h" k9 D
2. / B9 J! G3 Q1 ^0 e/ i% UPrivate Sub Worksheet_Change(ByVal Target As Range)
     \4 g% r2 c% [; Q
3. 1 T- y( y. J9 Q# p9 @! yWITh Sheets("Hatira")
   - y8 t6 a( L$ Y8 N
4.   Z. f' k7 c/ R3 w( MIf XX <> Target Then
   8 B: [" h8 A9 x5 x$ X, G8 S) A6 O
5. 9 E6 M" s# j" M  j2 u- e2 rROW1 = Sheets("Hatira").[A65536].End(xlUp).Row + 1
   ; W# Z. j2 R/ O  p3 i, O$ z* ~
6. 4 T, }. Q1 E& ~3 g9 [) w1 |.Cells(ROW1, 1) = Date & "/" & Time" ]5 d$ s( ?& c; [8 l' o. Z
   ; {2 c) A' z/ a4 [% D: M% }$ e
7. .Cells(ROW1, 2) = XX
   
8. . i2 D3 C$ t$ Y; Z.Cells(ROW1, 3) = Target.Value9 W9 ]; v4 e. {  @1 j1 E
   ) S9 p2 `+ M% D) v+ ]) N$ U
9. .Cells(ROW1, 4) = Target.Address$ ]6 V% @$ A; m# H' ~
   
10. End If# D" C( v8 e: d8 N( ]/ `
    . ]4 R  y( u2 _/ r3 t& [* N
11. End With4 |' @" e* c2 h7 R2 |' Z  g# Z
    
12. End Sub' q% C9 J: r, c  M6 ?
    ) R! i1 S2 Q' @5 T' O
13. Private Sub Worksheet_SelectionChange(ByVal Target As Range)/ E+ I+ N/ A; D
    
14. XX = Target.Value
    
15. 2 p! s+ j3 P) E4 B) C" i- L+ l7 `End Sub

مەزمۇننى كۆچۈرۈۋېلىش

1 x# {& z& r) X1 H7 ^ئۇنىڭدىن كېيىن ئىجرا قىلىسىز. ئاندىن باشقا سىز ئۆزگەرتكەن سانلىق مەلۇماتلارنىڭ ئۆزگىرىش جەريانىنى خاتىرىلەش ئۈچۈن ئىككىنچى بىر جەدۋەلنىڭ نامىنى hatira دەپ ئۆزگەرتىپ قويسىڭىز ئۆزگەرتكەن ھەر قانداق مەزمۇننى ۋاقتى ۋە مەزمۇنى بىلەن ساقلاپ بېرىدۇ.
ئىزاھات: 查看代码 دېگەن كودنى خىزمەت دەپتىرى Sheet1 نىڭ ئۈستىگە مائۇس ئوڭ كۇنۇپكىسىنى چېكىپ چىققان تىزىملىكتىن كۆرەلەيسىز.چۈشۈرۈش

 

                                                   كىرگۈزگۈچ ئايال بالا پەن ئىللىق

illiq

ئىشلىتىش قىممىتى يۇقىرى ھۈنەركەن مەكتەپ ئىلمى بۈلۈمدىكى نەتجە ئىشلىگۈچى خادىملار ئۈگۈنۈپ قۇيۇشقا تىگىشلىك ھۈنەركەن ،

قاشتېشى

مەنمۇ ئۈگىنىپ قويسام بولغىدەك  بۇنداق بەلەن ھۆنەرنى.来自: Android客户端