जवाबों:
यह सरल यूडीएफ बीच में रिक्त कोशिकाओं के साथ दिखाए गए डेटा को स्थानांतरित करेगा:
Option Base 1
Function TranBlank(X As Range, Y As Long) As Variant
Dim RZArray() As String
Dim c As Range
i = 0
For Each c In X
If Len(c) > 0 Then
i = i + 1
ReDim Preserve RZArray(i)
RZArray(i) = c.Value
End If
Next c
TranBlank = RZArray(Y)
End Function
यह काम किस प्रकार करता है:
सूत्र में सेल संदर्भ को समायोजित करें जरूरत है।
=IFERROR(TranBlank(A$2:D$7,ROW(A1)),"")
आपका उदाहरण एक आदेश के साथ परिवर्तित नहीं किया जा सकता है। मुझे उम्मीद है कि आप इसे देखेंगे। तालिका के भाग को केवल माउस, सीटीएल-सी (कॉपी करने के लिए) के साथ चिह्नित किया जा सकता है और लक्षित स्थिति पर राइट-क्लिक करके एक "पेस्ट विशेष" चुन सकते हैं: आप उस संवाद को देखते हैं जहाँ आप "स्थानान्तरण" पा सकते हैं। जैसा कि यह वर्णित है यहाँ ।
--कोशिकाओं का प्रतिनिधित्व करते हैं? कृपया और अधिक विस्तार से बताएं कि आप कैसे चाहते हैं कि कोशिकाओं को फिर से तैयार किया जाए।