VBA/मैक्रो

Question

हाय लोग का उपयोग कर मैं 24 टेबल के साथ एक एमएस एक्सेस डेटाबेस है माइक्रोसॉफ्ट एक्सेस में तालिकाओं का नाम बदलने, मैं हर दिन

table 1 --> table 1backup 

किसी भी विचार से

टेबल नाम बदलने की आवश्यकता की सराहना की जाएगी

यह VBA

Answer 1

साथ संभव है आप कर सकते हैं:

Dim tdf As TableDef 

For Each tdf In CurrentDb.TableDefs 
    If Left(tdf.Name, 4) <> "MSys" Then 
     tdf.Name = tdf.Name & "_backup" 
    End If 
Next